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I lace una década, a principios de los noventa. Microsoft revoluciono el de¬ 
sarrollo de aplicaciones para Windows con la presentación de la primera ver¬ 
sión de Visual Basic, un lenguaje que, con el tiempo, se ha convertido en el mas 
utilizado por los programadores que tienen el sistema operativo Windows co¬ 
mo objetivo. I lasta entonces, las opciones para construir aplicaciones para este 
sistema se limitaban prácticamente al uso del lenguaje C y la compleja AN de 
Windows. 

Visual Basic simplificó de manei a sorprendente tareas que, hasta ese momen¬ 
to, resultaban arduas. I I simple diseño de un cuadro de diálogo, conteniendo 
listas, cajas de testo v bolones, requería un trabajo considerable utilizando C 
Con Visual Basic, por el contrario, era una tarea acometida con operaciones de 
arrastrar v soltar y que podía resolverse en minutos. 

I n esta década, desde Visual Basic 1.0 hasta la presentación de Visual Basic 
Nl l, no es necesario decir que lodos los aspectos que tienen que ver con la in¬ 
formal ica han i amblado mucho y, obviamente, el desarrollo de aplit aciones no 
es un campo ajeno a esos cambios. Ahora los proveí los no son desarrollados 
dt* lorma monolítica por un mismo equipo, sino que se usan componentes dis 
cretos. propios u ofertados por terceros, para crear aplicaciones distribuidas 
que en muchas ocasiones, usan Internet como plataforma di* trabajo 

I as herramientas v lenguajes de entonces no están, en su mayor parlo, pre¬ 
parados para estas nuevas necesidades, lo cual implica un trabajo mucho ma¬ 
yor por parle dt* los programadores Suponga, por ejemplo, que quiere crear 
un componente transaccional y ton capacidad de atender a múltiples clientes, 
ion varios hilos de ejecución paralelos, elaborando la información de una base 








di* datos para facilitarla a unas interfaces Windows v Web. Actualmente, para 
crear el componente sería preciso utilizar Visual C++, para la interfaz Windows 
lo más fácil seria recurrir a Visual Basic v para la interfaz Web a Visual InterDev. 
Si necesitásemos otras posibilidades, como la de ofrecer la misma función en 
forma de servicio Web, deberíamos recurrir a añadidos a Visual Sfudio b. 

Foe>\blUdadee de Visual Basic .NET 

l a versión definitiva de Visual Basic .NF.T será presentada en San Francisco 
el próximo día H de febrero de 2002, como parte de Visual Studio .NI I En el 
momento de escribir este libro, a finales de 2001, está disponible tanto una ver¬ 
sión beta en castellano de Visual Studio .NF.T como una 'Reléase Camiidate en in¬ 
gles. El producto Visual Basic .NET, sin embargo, no existe actualmente como 
tal, separadamente, sino como parte de Visual Studio NI I, aunque sí lo estará 
posteriormente ya de manera comercial. Para escribir este libro se ha utilizado 
la versión beta 2 en castellano de Visual Studio .NET l tilerpritc Architcct, de la 
que forman parte también Visual O y Visual C++ .NET. 



1 Microsoft Visual Basic: Release History for Visual Basic • Microsoft Internet Explorer 

' a.Ü0 

Arito*) (¿nutrí ysr ¿Morana «anao-amas 

* 

• Q LÓ f» ✓ SüKjusd* favontot ^ '> * Cl * ^ 


4] fiRpi/ tmln irecrosirfl.catiiitti.Mir'.luit'/'rHtftify aip 




Visual Basic.net 

Microsoft 


Noverribei 1992 v*w»»l 2.0 lv vWmIow* Is Mad* 
Avatebte 

Mcniwfl amouncat fhe «vaUJbtttty of Vituai Basic txu Wwiúúmts 3 0 
■;pfoto*ional arul Standard «dttMns> It mora ituti MX> tío* 

fosfuros and •nh«v;*i^ar>ts fror buiMmg fastar appltcafiirara jcííh 
to advsnc*<n«»fijr*« o< Windows, and grsstai }«»«*> v* 
prmJüctMty 


M, ros-'lt trvnuiKtt Microsoft Vt--ii.il |Uik" fm VHr«Vw\i 41 W.O.J..*» W«l*l l‘>«t 
m Atlanta 


S q xw ifte» l. 1992; Visual Bdvcfot MS-Ü06 
í>rnndulrd fnr R<*le* ^ 


Microsoft «mounen Microsoft Visual |«k fg» MS 
DOS.£ «t Standard and frúfocuonal ».íif.,-rr i>» 
Visual Baste fot Windows., «hn »«uort cúffihirwK ttm 
«as* t»r graptocal daugn witti ttw powar and 
vanaMty ol tiadmonal prograrimtng t‘*vatope<; 
mrr^dy >Saw lh« loor intarfo.;» and artacTt coda rtiaf 
resetmdc to «vwit*. 


Vivn.il Bug. lililí 
UlttlMlay 

* (sano » 

Mmm imi>n <t» 
«huitn> 

»— r*» !»■ ll 

bu 

•iil C»»*t •* 

Wi; • •»!«*• 

W.V Prrt j ■ t*.« 

futan 

'-liO* • • * **••• 

h,*u urt 

“i»-** »r J 9 

Wa*MC-'*rt 
«.»» Vnuml Sun» 
UOrniMb *ün» 

Sm • 'd t*« 

a «.<al ■»_ 

«Utl 


Release History for Visual Basic 

May 20. 1991: IminducriQ Vmial Bttw 1.0 fot vVhi-Icws 


Figura 1.1. En la sede de Microsoft podemos encontrar la historia y evolución 
de Visual Basic 






Independientemente de esta circunstancia, y de que adquiramos Visual Slu- 
dio .NI I completo o Visual Basic .NFT de manera individual, las cualidades 
que encontraremos serán prácticamente las mismas. Visual Basic es ahora un 
lenguaje* orientado a objetos, con cualidades similares a las de C++, sin por ello 
haber perdido su especialidad la manipulación v creación de componentes. 
Podemos crear clases en Visual Basic .NFT derivándolas de otras, va estén es¬ 
critas también en Visual Basic NFT o bien en otros lenguajes NI-1, como 
Disponemos, por lanío, de una característica largo tiempo reclamada por una 
parte de los usuarios de Visual Basic: la herencia. 

Cambien es un lenguaje qué cuenta con la capacidad de <obrcnn^iu méto¬ 
dos, de tal forma que pueden existir múltiples versiones de un mismo método, 
cada uno tomando una lisia de parámetros distinta. Se ha añadido un control 
estructurado de excepciones moderno, dando paso a la superación del arcaico 
On Error Goto. F.xisten operadores aritméticos y lógicos abreviados, inicia- 
libación de variables durante la declaración, mavor consistencia de tipos de 
datos, etc. 

Cualquier tipo de aplicación escrita con Visual Basic .NFT puede utilizar 
libremente varios hilos de proceso concurrente, lo que habitual mente se deno¬ 
mina fnr Iturmlin^. No sólo podemos i roar aplicaciones para Windows \ com¬ 
ponentes para ellas, también podemos usar Visual Basic .NI I para producir 
aplicaciones de consola, servicios Windows, interlaces Web, componentes de 
servidor ASF NFI v servicios Web. 

Como lenguaje integrado completamente en la plataforma NI I Visual Ba¬ 
sic .NFT genera codigo MSIF (Minvsoft Inlrimcduitc Ltni^un^e) y, por tanto, tie 
ne un acceso tolal a los servicios de dicha plataforma, tsto significa que puede 
utilizar centenas de clases de objetos y componentes para, por e|einplo, mani¬ 
pular archivos en disco, obtener información de tipos en ejecución, trabajar 
con gráficos, acceder a bases de dalos, ele. Todos esos servicios se engloban en 
algunos grupos, como ADO.NFT, para el acceso a datos; CDI+, para los gráb¬ 
eos o impresión; ASI’ NFI . para todo lo relacionado con la Web, etc 

tn definitiva, con Visual Basa .NF I no necesitaría recurrir a ningún otro 
lenguaje ni herramienta externa para construir la aplicación distribuida que se 
indicaba al final del punto previo. Visual Basic .NI l es un lenguaje mucho mas 
polente y flexible, un lenguaje orientado a objetos y al trabajo con componen¬ 
tes que, prácticamente, se pone al mismo nivel queC» ♦ pero sin las complejida¬ 
des propias de dicho lenguaje. 

Objetivo de este libro 


Al redactar este libro el objetivo que tenemos en mente es facilitar al lector un 
material didáctico que, por si solo, le permita aprender a programar con Visual 
Basic .NF I \ utilizar este lenguaje para desarrollar los tipos de provecto más 
habituales. I I libro, por lo tanto, no estudia a londo el entorno de Visual Studio 
.NI I. el tuncíonamíenlo de la plataforma .NF I o sus servicios, centrándose en 
las novedades de Visual Basic NI I cotilo lenguaje y el trabajo diario con el. 



Comenzando desde el primer capitulo, el que tiene a la vuelta de esta pági¬ 
na, podrá seguir procedimientos prácticos para familiarizarse básicamente con 
el entorno de trabajo y los fundamentos del funcionamiento de la plataforma, 
centrándonos a partir de entonces en el estudio del lenguaje, el desarrollo de 
aplicaciones Windows v Web, componentes v servicios. 

En los distintos capítulos aprenderá a usar, desde Visual Basic, ADO.NET 
para trabajar con datos procedentes de bases de dalos como SQL Server, l'.Db 
para crear gráficos, manipular imágenes o imprimir información, ASP.NET pa¬ 
ra diseñar interfaces de usuario y servicios Web, Crvslal Reports.NET con el 
fin de crear informes, etc. 

í ambién aprenderá a crear aplicaciones, sin importar su tipo, usando múlti¬ 
ples hilos de ejecución concurrentes, reutilizando componentes COM hereda¬ 
dos de proyectos previos o bien accediendo a los servicios nativos del API de 
Windows. 

Disponiendo de Visual Studio -NFT, la beta 2 en castellano o bien la versión 
definitiva, o de Visual Basic NET, como producto separado, lo único que nece¬ 
sitará para comenzar a desarrollar sus propias aplicaciones es el libro que tiene 
en sus manos. Pase la página y póngase cómodo. No pierda el ordenador de vis¬ 
ta v prepárese para comenzar. 








Primera toma 
de contacto 


lin este capítulo, asumiendo que ya tiene instalado en su sistema Visual Ba¬ 
sic .NET o alguna de las ediciones de Visual Studio .NET, vamos a experimen¬ 
tar nuestra primera loma de conlaclo con el entorno y, de paso, aprenderemos 
algunos conceptos básicos a fin de crear nuestra aplicación NET con Visual 
Basic .NET. El objetivo principal es ayudarle a perder el miedo durante esos 
primeros minutos en los que ha de enfrentarse a una nueva herramienta, con 
un entorno que desconoce, y que suelen ser los más difíciles. 

Recuerde que este libro está redactado utilizando una versión preliminar 
de Visual Studio NET en castellano, por lo que en su caso, utilizando posible¬ 
mente una versión definitiva del mismo producto, puede encontrar diferencias 
puntuales en las imágenes, títulos de opciones de menú y elementos similares. 

Observe que en este capitulo el contenido teórico es mínimo. Para iniciar 
Visual Basic NET y crear un programa simple no lo necesitamos. En los capítu¬ 
los siguientes tendremos tiempo de ocuparnos teóricamente sobre aspectos del 
lenguaje, el entorno y la plataforma NFT. 

Puesta en marcha de Visual Pasic .NET 

Recurriendo, como es habitual, al menú Inicio de Windows, encontrara en 
la lista de programas una entrada correspondiente a Visual B¿isic .NET o Vi¬ 
sual Studio .NEI, según el producto que tenga instalado. Seleccionándola pon¬ 
drá en marcha el entorno de desarrollo. En la ventana de presentación, la típica 







<}>l¡i±h que ttin solo permanece unos segundos en pantalla, podra ver los elemen¬ 
tos relacionados con Visual Studio .NF.T que tiene instalados en su sistema. En 
la figura I 1, por ejemplo, puede ver que el entorno usado es la Rctn 2 de V 'iaunt 
Studio NET Enterprise, que cuenta con Visual Basic NTT, Visual C# .NI I. Vi¬ 
sual C++- .NET, Crystal Reports y Application Ccnter Test- 



Figura 1.1. En la ventana de inicio podemos ver los productos 
que tenemos instalados 

Si añadimos al entorno otros productos, como Visual Jff .NI-’T, C'OBOl .NI- I 
o Perl NET, por poner algunos ejemplos, estos aparecerán también en forma 
de iconos en esa misma ventana de inicio. En cualquier caso, a nosotros nos 
basta con que exista Visual Basic NF.T que, en definitiva, es la herramienta en 
la que vamos a centrar nuestra atención. 

La página de inicio 

I ras una instalación nueva de Visual Basic .NF.T, asumiendo que es la pri¬ 
mera ve/ que iniciamos el entorno, lo primero que vemos aparecer es la Página 
de inicio, concretamente la sección llamada Mi perfil. F.n ella existen varios apar¬ 
tados que nos permiten configurar el comportamiento del entorno para que se 
adapte lo mejor posible a nuestros conocimientos (véase figura 1.2). 

Desplegando la lista titulada Perfil, la que aparece en la parte superior de la 
página, podremos indicar la herramienta que estamos acostumbrados a utili¬ 
zar: Visual Basic, Visual C++, Visual InterDev, etc. Dependiendo de la opción 
elegida, automáticamente se establecerá la configuración de teclado v distribu 
ción de ventanas de Visual Basic NI I Estos elementos, no obstante, también 
pueden establecerse de manera individual. En la figura 12, por ejemplo, se ha 
optado por la distribución de teclado habitual de Visual Basic pero mantenien¬ 
do la distribución de ventanas predeterminada de Visual Studio .NET. 

Otros aspectos que puede configuraren esta sección es el filtro para acceder 
a la ayuda y si ésta se mostrará en una ventana interna, dentro del mismo en¬ 
torno, o bien como una ventana independiente. Por ultimo, en la parte inferior, 




puedo indicar que desea que ocurra cada ve/ que inicie de nuevo Visual Basic 
• NF.T. Puede dejar que aparezca siempre la Página de inicio, concretamente la 
sección Introducción, o bien indicar que se abra el ultimo proyecto con el que se 
trabajo, que se muestre un cuadro de dialogo para seleccionar el provecto, etc. 
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Figura 1.2. Ajustamos nuestro perfil utilizando la página de inicio 


Nota 

Si en algún momentop/ercte la Página de inicio de vista, porque la haya ce¬ 
rrado inadvertidamente, puede recuperarla pulsando el botón [3] o selec¬ 
cione la opción Ver>Explorador Web>lnicio. 

I n taso de que mantenga en la opción Al iniciar el valor oliendo por defec¬ 
to, cada vez que inicie Visual Basic NI I se encontrará con una ventana como 
la de la figura 1.3. Realmente es otra sea ion de la misma Página de inicio, en 
este caso ofreciendo una lista de los últimos proyectos con los que se ha traba¬ 
jado. para abrirlos con un simple clic, asi como los botones necesarios para 
abrir otros provectos o iniciar un nuevo. 

Utilizando el resto de las secciones de la Página de inicio se podrá acceder a 
la comunidad en linea, a través de Internet, noticias sobre Visual Basic .NFT, 










actualizaciones, etc. Tan sólo tiene que pulsar cada una de las opciones y expe¬ 
rimentar para ver el resultado. 



Figura 1.3. Aspecto de la Página de inicio ofreciendo las opciones para abrir 
e iniciar proyectos 


Elementos fundamentales 

Además de la Página de inicio, en el entorno de Visual Basic .NFT encontra¬ 
rá algunos elementos mas, algunos de ellos fundamentales para poder desarro¬ 
llar nuestro trabajo. 

F.n realidad los elementos visibles dependerán de la distribución de venta¬ 
nas que previamente, en la sección Mi perfil, hayamos seleccionado. Asumiendo 
que hemos mantenido la disposición por defecto, en la parte derecha podemos 
ver dos ventanas adosadas La primera, en la parte superior, cuenta con dos 
páginas: Explorador de soluciones v Vista de clases. F.n la inferior aparece la 
ventana Ayuda dinámica 

F.l entorno de desarrollo en el que trabaja Visual Basic .NI.I es capaz de 
ocultar automáticamente las ventanas que no están utilizándose, mostrándolas 
de manera inmediata en cuanto el puntero del ratón se sitúa en el lugar adecua¬ 
do. I n la parte superior izquierda del entorno, según la ventana mostrada en 
la figura 1.3, puede ver que hay una pestaña con un icono y un texto en vertí- 









cal: Explorador de soluciones. Debajo hay tin botón con otro icono. Si sitúa el 
puntero del ratón sobre el verá aparecer el Cuadro de herramientas. 

La parte superior de la ventana principal está ocupada por un menú de op¬ 
ciones y unas paletas de botones. Con ellos podrá iniciar un nuevo proyecto, 
abrir v guardar archivos, acceder a la Página de inicio, navegar por la ayuda, 
etc. Conocerá algunos detalles más sobre el entorno en un capitulo posterior. 
Por ahora simplemente tenemos una noción general de lo que hay alrededor. 


Inicio de un nuevo proyecto 


Con el fin de cumplir con el habitual ritual que prácticamente exige que el 
primer programa que se escribe con un nuevo lenguaje o herramienta sea el 
típico Hola mundo, vamos a ver cuáles serian los pasos que daríamos en Vi 
sual Basic .NET para conseguir dicho objetivo. De paso veremos cómo crear 
una aplicación de consola con Visual Basic, una nueva característica inexisten¬ 
te en versiones previas de este producto. 

Asumiendo que acaba de iniciar Visual Basic NE'I y que, por tanto, tiene la 
Página de inicio delante, para iniciar un nuevo proyecto tiene las alternativas 
indicadas en la figura 1.4. Podemos pulsar el botón Nuevo proyecto, ya sea el 
que aparece en la parte inferior de la mencionada Página de inicio o el que hay 
en la barra de botones, en la parte superior La otra alternativa es desplegar el 
menú Archivo v seleccionar la opción Nuevo>Proyecto. 
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Figura 1.4. Elementos de interfaz para iniciar un nuevo proyecto 


En cualquier caso, independientemente del método usado, veremos apare¬ 
cer el cuadro de dialogo Nuevo proyecto. En el encontrará dos listas, según se 





¿ípri'i 1a en la lisura 1 . 3 . I .1 di» la i/.quierda contiene varias carpetas agrupando 
los dislinios tipos de provéelo disponibles, mientras que en la de la derecha apa 
recen los elementos de la carpeta seleccionada a la izquierda I n nuestro caso 
hemos elegido a la i/quierda la carpeta Proyectos de Visual Basic \ a la dere¬ 
cha el elemento Aplicación de consola 


Nota 

Los tipos de proyecto disponibles en la herramienta dependerán del pro¬ 
ducto que tengamos instalado. La figura 1.5 corresponde a Visual Studio 
NET, de ahí que existan carpetas de proyecto Visual C # y Visual C++. Si 
tenemos instalado Visual Basic .NET como producto separado, lógicamen¬ 
te esas carpetas no existirán. 
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Figura 1.5. Cuadro de dialogo Nuevo proyecto 


Además de indicar el tipo de provecto que deseamos iniciar, en este raso 
una aplicación de consola, en los apartados Nombre y Ubicación deberemos m 
I inducir el < aminn en el que se creará el proyecto y su nombre I ste determina¬ 
ra el nombre de l.i carpeta en la que se almacenaran todos los an h¡\os 1011 que 
cliente el provecto. 


Análisis de I código 

Intmdiu idos lodos los parámetros en < *1 cuadro de dialogo anterioi «d pul 
sai Intro o bien el boton equivalente se «. reara el nue\ o pruVe< lu ‘sus elemen 
los podremos verlos en l.i \ enlana del Explorador de soluciones, mientras que 
i*l código correspondiente al único modulo existente en el proveí lo apare» era 
abierto en el correspondiente editor (vease ligura I o) tan solo tenemos que 
introducir Lis sentencias a rjecular cuaiulo este provecto se eje» ule 
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Figura 1.6. El codigo del nuevo proyecto aparece en el editor 
de Visual Basic NET 


I I código define un módulo, llamado Module 1. que contiene una lumion 
llamada Main{ ) I n su interini introducimos la sentencia System.Conso¬ 
lé . Wr i teL i ne (" Hola mundo" ). de tal forma que el programa completo se- 
i ta el siguiente: 

Module Modula I 
Sub Mam ( ) 

SyKtem.ConsoIe.WriLeLiüe(”Hala mundo") 

End Sub 

End Module 

I o ipil* hacemos en esa sentencia es invocar al método WriteLine( ) de la 
clase Consolé, una clase definida en el ámbito System Podemos llamar di¬ 
rectamente al mebado, sin crear previamente un objeto de la clase Consolé, 
porque es un método compartido o osla lien. Conocerá lodos estos detalles en 
capítulos posteriores, por ahora es suficiente con que tenga una idea global de 
lo que está haciendo. 

I I mencionado método WriteLine( ) puede lomar distintos parámetros, 
entre ellos una cadena de caracteres. C uando introduzca el código en el editor, 
al abrir el paréntesis para la lista de parámetros, verá aparecer lina pequeña 
ventana emergente de ayuda indicándole los parametros necesarios. Observe 
que dicha ventana i lienta con unos pequeños bolones, en forma de Hecha, que 





nos permiten elegir entre varias versiones diferentes del método WriteLine ( ). 
va que este se encuentra <obrt‘cm$<u1o. 

Ejecución 

Para desarrollar este sencillo programa no hemos utilizado ningún diseñador, 
ni editado propiedades ni trabajado visualmente con componentes. lan solo 
nos hemos servido de un asistente, el que ha generado la mayor parte del códi¬ 
go, y usado el editor para introducir una sentencia. \ \ resultado, no obstante, 
es una aplicación de consola completa. 

Basta la pulsación de la combinación de teclas Control-F5 para compilar el 
proyecto, obteniendo el correspondiente ejecutable, e iniciarlo. I I resultado se¬ 
ra similar al mostradoen la figura 1.7. Simplemente aparece en una ventana de 
consola la cadena de texto entregada como parámetro a WriteLine( ) 
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Figura 1.7. Resultado de la ejecución del programa 


Nota 

La combinación de teclas Control-F5 equivale a la opción Depurar>lniciar 
sin depurar. Lo habitual es usar Depurar>lniciar, o pulsar F5. pero en ese 
caso la ventana de consola se cerraría de inmediato al finalizar la ejecución 
del programa, impidiéndonos observar el resultado. 


Antes de ejecutarse, el código ha sido compilado generando código en MSII 
(Microsoft httcrnuutiiitc I Dicho código se almacena en un cn+tinibliuli) 

que, en apariencia, es como un ejecutable cualquiera hncontrará dicho ensam¬ 
blado, en este caso HolaMundo.exe. en la subcarpeta bin de la carpeta co¬ 
rrespondiente al proyecto. 

l os proyectos generados con Visual Basic NI I tan sólo pueden ser ejecuta¬ 
dos en sistemas donde este instalada la plataforma Microsoft .NI I I s decir, 








no puede tomar el archivo HolaMundo.exe. copiarlo a otro ordenador y espe¬ 
rar a que funcione directamente. La plataforma Microsoft .NET se encuentra 
incluida en Windows .NE I v será distribuida como un añadido para las demás 
versiones de Windows. 

Un vistazo al ensamblado 


En este caso, a partir del ejemplo anterior, hemos obtenido un ensamblado 
compuesto de tan sólo un archivo: el propio ejecutable. Como se ha dicho, el 
ensamblado no contiene código directamente ejecutable sino MS1L, un codigo 
intermedio, no es codigo fuente ni tampoco ejecutable, que es compilado a pos- 
leriori en un proceso que conocerá con mayor detalle en un próximo capitulo. 

Podemos echar un vistazo al contenido del ensamblado gracias a la existen¬ 
cia de la herramienta externa ildasm. Recurra a la linea de comandos usando 
la opción Visual Studio .NET Command Prompt que aparece en el grupo de 
programas de Visual Basó .NLT. A continuación cambie a la carpeta en la que 
se encuentra el proyecto de ejemplo anterior e introduzca el comando ildasm 
seguido del nombre del ejecutable, HolaMundo.exe en este caso. Vera apare¬ 
cer una ventana similar a la de la figura 1.8, en la que se ha desplegado la rama 
HolaMundo y el nodo Modulel. 



Figura 1.8. Contenido de nuestro primer ensamblado construido 
con Visual Basic NET 

H ensamblado, HolaMundo.exe, contiene un manifiesto, representado como 
MANIFEST en la ventana citada antes, y un ámbito llamado HolaMundo. En el 
interior de ese ámbito encontramos la clase Modulel que, a su vez, cuenta con 
un constructor y un método compartido o estático llamado Main( ). 












l laga doble clic sobre el método Main ( ). Verá entonces aparecer una nueva 
ventana con el código MS1L de ese método, un código que, como se aprecia en 
la figura 1.9, se asemeja bastante al lenguaje ensamblador. 



Figura 1.9. Código MSIL del método Main( ) 


No vamos a entrar en detalles sobre el código MSIL ya que no nos interesa 
en este momento, pero puede ver que es un código bastante compacto que, en 
total, no llega a ocupar Ib byles. El ensamblado completo, que contiene este có¬ 
digo e información adicional, tan sólo ocupa 6 kbytes. 


Opciones áe\ proyecto 


Ai explorar el contenido del ensamblado hemos vislo que el modulo Modu¬ 
le 1 es, en realidad, una clase, si bien con unos atributos específicos que cono¬ 
ceremos posteriormente. Esta clase está contenida en un ámbito o espacio con 
nombre llamado HolaMundo, Está claro que el nombre de ese ámbito se ha ob¬ 
tenido a partir del nombre de proyecto, nombre que establecimos en el asisten¬ 
te en el momento de la creación. 

Desde la ventana de propiedades del proyecto es posible modificar éstos y 
muchos otros parámetros. Para abrir esa ventana pulse con el botón secunda¬ 
rio del ratón sobre el proyecto, en la ventana Explorador de soluciones, v luego 
seleccione la opción Propiedades (véase la figura 1.10). Aparecerá una ventana 
como la de la figura 1.11, estando abierta por detecto la página General. En ella 
se indica el nombre que tendrá el ensamblado, el tipo de aplicación resultante 
v el nombre del espacio de nombres o ámbito que actuará como rar/ de todo el 
proyecto. 

Al ocuparnos del lenguaje Visual Basic .NF.T propiamente dicho profundi¬ 
zaremos sobre la utilidad v uso de los ámbitos con nombre, una de las noveda¬ 
des incluidas en esta versión. 
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Figura 1.10. El menú emergente del proyecto nos da acceso 
a la ventana de propiedades 



Figura 1.11. La ventana de propiedades del proyecto cuenta 
con múltiples páginas de opciones 

Puntos- clave 

• Al iniciar Visual Basic .NI I se encontrará con el entorno de desarrollo de 
Visual Stlidio NI T, un entorno que estará compartido con otros lengua¬ 
jes y herramientas en el caso de que no esté utilizando Visual Basic .NI I. 
como producto independíenle, sino algunas de las ediciones de Visual 
Sludio -NK I 








• I I enlomo de desarrollo puede adecuarse a nuestros conocimientos Uti¬ 
lizando la sección Mi perfil de la Página de inicio podemos eslablecer la 
distribución de teclado, disposición de la ventana v otros parámetros re¬ 
lacionados. 

• Cada vez que iniciemos Visual Basic .NI* I nos encontraremos con la Pá¬ 
gina de inicio, desde la que podemos abrir un proyecto existente o crear 
uno nuevo. 

• I n el entorno de desarrollo encontramos algunos elementos tundamenta- 
les, como el Explorador de soluciones, la ventana de Ayuda dinámica o el 
Cuadro de herramientas. 

• Desde el Explorador de soluciones podemos acceder a los distintos elemen¬ 
tos que forman parte de nuestro proyecto, utilizando el menú emergente 
asociado para manipular esos elementos. 

• I n la ventana Nuevo proyecto se encuentran los asistentes que usaremos 
para iniciar los distintos tipos de provecto que pueden desarrollarse con 
Visual Basic NhT. 

• II resultado de un proyecto Visual Basic .NI’ I es un ensamblado. I ste se 
puede componer de uno o más módulos, en cuyo interior se aloja el códi¬ 
go MSI! . 

• l os ejecutables obtenidos con Visual Basic .NI I no pueden utilizarse di 
reí lamente en cualquier equipo, es necesario instalar previamente la pia¬ 
la forma Microsoft .NFT. 

• Utilizando la ventana de propiedades del provecto podemos configurar 
multitud de opciones, entre ellas el nombre del ensamblado y el del ám- 
bilo en el que se incluirán todos los elementos del proyecto. 


Resumen 


Este capitulo nos ha servido para acercamos por primera vez a Visual Basic 
.NFT, principalmente el entorno de desarrollo, siguiendo los pasos necesarios 
para desarrollar una sencilla aplicación de consola. De manera análoga podría 
mos haber cre.ulo una aplicación Windows con un formulario, una aplicación 
Web o un componente I I proceso no habría sido mucho mas complejo, aunque 
si los recursos utilizados por el provedo 

I o impor tante es que, hásii ámenle, va sabe qué pasos debe dar para iim i.ir 
Visual Basic .NI I, crear un provecto, compilarlo v ejecutarlo desde el propio 
enlomo. I la usado un método de una ( lase va existente \ utilizado una herra¬ 
mienta para examinar el contenido de un ensamblado. In conjunto, lodo ello 
I ¡ene como objetiv o hacerle perdei un poco el miedo inii ul al comenzar a usar 
una nueva herramienta I n la práctica, tiene una base inicial para comenzar a 
trabajaren los próximos capítulos. 









2 

El entorno 
de deearroWo 


I.os programadores somos usuarios de aplicaciones, en nuestro caso herra¬ 
mientas de desarrollo, que, básicamente, cuentan con los mismos elementos 
que podemos encontrar en cualquier otra aplicación: ventanas con menús de 
opciones, barras de botones, menús emergentes, paletas de herramientas, etc. 
F.n este sentido, el entorno de desarrollo de Visual Basic .NET no se diferencia 
en exceso del que podríamos encontrar en un programa de retoque fotográfico, 
una hoja de cálculo o una aplicación de diseño. La diferencia, obvia, es que no¬ 
sotros tratamos con elementos relativamente abstractos: diseñamos ventanas y 
componentes y codificamos una lógica de implemcntación que queda oculta. 

Para poder hacer nuestro trabajo necesitamos, lógicamente, conocer el entor¬ 
no en el que vamos a desenvolvernos. F.n nuestro caso esto significa conocer los 
elementos del entorno de desarrollo de Visual Basic .N1T. Ese es el objetivo de 
este capítulo: indicarle qué elementos son los que puede encontrar y su utilidad. 
No se trata de establecer un material de referencia, para eso ya está la propia 
avuda del entorno, sino de descubrir rápidamente los elementos más impor¬ 
tantes v la manera de utilizarlos. 


Disposición generaI 

El entorno de desarrollo de Visual Basic .NE I usa por defecto un esquema 
de ventanas adosadas o ancladas unas a otras. Existe un elemento central: la 
ventana en la que aparece la Página de inicio, los distintos editores de código v 






diseñadores visuales. I'.su parte ocupa, como acaba de decirse, el espacio cen¬ 
tral I os distintos elementos abiertos aparecen como páginas apiladas unas so¬ 
bre otras, con una pestaña en la parte superior que facilita su selección 

Aparte de ventanas adosadas unas a otras v ventanas apiladas en forma de 
paginas, también podemos encontrar ventanas que se ocultan automáticamente, 
ruando no son necesarias, v aparecen al situar el puntero del ratón sobre la 
pestaña que contiene su titulo. I as ventanas también pueden quedar como Mo¬ 
tantes, sin ningún enlace visual con el entorno, En cualquier caso, todos estos 
estados pueden alterarse con una simple operación de arrastrar v soltar o un 
sencillo clic cié ratón. 

bu la figura 2.1 se indica el estado de algunas ventanas. La parte central esta 
ocupada por un diseñador de esquemas XMI , en la parte superior, y el editor 
de código, en la interior A la derecha aparecen la ventana Ayuda dinámica v la 
ventana Propiedades, adosadas una sobre la otra. Ln el margen izquierdo del 
entorno, verticalmente, podemos ver dos pestañas que corresponden al Explo¬ 
rador de servidores v el Cuadro de herramientas 

Para controlar la ocultación automática de las ventanas so utiliza el bolón 
que aparece en el extremo derecho de la barra de titulo, junto al botón de cie¬ 
rre. Dicho bolón simula una chínchela que podemos pinchar, para que la venta¬ 
na quede tija en su posición, o bien soltar, para que se m ulte automáticamente 
cuando no esté siendo necesaria. I I botón de* ocultación automática sólo apare¬ 
ce en las ventanas que están adosadas a algún margen del entorno, no en las 
ventanas Motantes. 


Veníanos que se auiooculian 


Ventanas apiladas 


Control ocultación automática 
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Figura 2.1. Estado de las ventanas que hay en el entorno 




Una ven lana que no se oculta automáticamente permanece siempre adosada 
a un mareen de la ventana principal de Visual Basic .NI: I . no siendo posible mo¬ 
dificar este estado hasta en tanto no desactivemos la propiedad di» ocultación 
automática. Kn ese momento, podemos tomar la ventana, con el botón princi¬ 
pal del ratón, v arrastrarla por el entorno hasta una nueva localización. Si lo¬ 
mamos la ventana pulsando sobre su barra de Iilulo desplazaremos todo el 
conjunto, en caso de que haya múltiples ventanas apiladas en paginas. Si tan 
sólo quiere operar sobre una de ellas, en lugar de la barra de titulo pulse sobre 
la pestaña que representa a esa ventana. 

A medida que vaya arrastrando la ventana sobre el entorno, un borde diná¬ 
mico le irá mostrando cómo quedaría si la soltase en ese momento. Pruebe a 
acercar el puntero del ratón a los márgenes de la v entana principal, los de otras 
ventanas va adosadas o flotantes o la barra de titulo de esas ventanas. La ven¬ 
tana arrastrada quedara adosada al margen o apilada como una nueva pagina, 
según los casos. Si libera la ventana lejos de cualquier margen conseguirá que 
quede como flotante 

I as paginas que ocupan el area central del entorno, en la que aparecen dise¬ 
ñadores, editores y el navegador Web, aunque pueden adosarse unas a otras, 
en lugar de aparecer todas apiladas en forma de paginas, no pueden quedar 
flotantes. Recurra a las opciones del menú emergente, pulsando el bolón secun¬ 
dario del ratón sobre cualquiera de las pestañas, para conseguir un electo idén¬ 
tico sin necesidad de arrastrar v soltar. 


Nota 

Usando la ventana de opciones del entorno, que conocerá posteriormente, 
es posible cambiar el mecanismo de funcionamiento de las ventanas de Vi¬ 
sual Basic .NET de tal manera que en lugar de aparecer ancladas unas a 
otras, que es la opción por defecto, se ajusten al funcionamiento típico de 
una aplicación MDI (Múltiple Document Interface), con una ventana princi¬ 
pal conteniendo las ventanas hija de editores y diseñadores. 


Soluciones y proyectos 


Los distintos cleincntns que» se usan i*n Visual Basic NI I para desarrollar 
aplicaciones formularios, recursos, codigo, etc., se agrupan de manera ¡erar 
quita en varios niveles La raí/, o el nodo principal, es la ^otiuion, que puede 
c ontener uno o más provectos. Ln cada provecto existirán hu míllanos, contro 
les, definic iones de clases, referencias externas, etc. Mediante el Explorador de 
soluciones podemos gestionar lodos esos elementos. 

I I Explorador de soluciones aparece inicialmente, asumiendo que estamos 
utilizando la configuración por detecto de Visual Basic .NF.T, en la parte supe 
rmr derecha del entorno Si no lo ve, puedo hacerle» aparecer mediante la rom 
bin.u un) Control-A11-1 I ombien puede usar la opcion Explorador de soluciones 




dt*l menú Ver consiguirndo el mismo resultado. I n la figura 2.2 se puede ver 
esta ventana con los elementos de una aplicación Windows simple I os menus 
emergentes son los que corresponden al proyecto 

Como puede ver, la solución aparece como primer elemento de la ventana, 
en este caso contando con tan sólo un nodo: el proyecto AppWindows. liste dis¬ 
pone de una carpeta de referencias v dos módulos, ti llamado Forml.vb co¬ 
rresponde al formulario existente en el provecto. Haciendo doble clic sobre 
cualquiera de estos elementos lo abriremos en su respectivo editor o diseñador. 
I amblen puede usar los dos primeros botones que hay en la parte superior de 
la ventana, contando de izquierda a derecha, para acceder al código o al dise¬ 
ñador del elemento seleccionado en ese momento. Usando el menú emergente 
asociado a cada elemento es posible realizar diversas tareas. Si pulsa el boton 
secundario del ratón sobre un proyecto, por ejemplo, podrá generarlo, elimi¬ 
narlo, cambiar el nombre, añadirle nuevos elementos o nuevas referencias. 

C ada uno de los elementos que aparece en el Explorador de soluciones se al¬ 
macena en un archivo con una determinada extensión v formato, l a solución, 
que relaciona a los demas elementos, se aloja en un archivo de texto con exten¬ 
sión sin I os proyectos, dependiendo del lenguaje, se almacenan en archivos 
con extensiones diversas. Kn el caso de Visual Basic la extensión es vbproj, 
siendo su contenido XML. Algo similar ocurre con los módulos de código y co¬ 
rrespondientes «i formularios, cada uno de los cuales se escribe en un archive» 
con extensión idenlil u adora del lenguaje. 



Figura 2.2. Ventana del Explorador de soluciones 


Nota 

Eche un vistazo a la carpeta del proyecto creado en el capítulo previo para 
ver los distintos archivos generados. También puede seleccionar un ele¬ 
mento cualquiera en el Explorador de soluciones y ver el camino y nombre 
del archivo correspondiente en la ventana Propiedades. 




Objetos existentes en un módulo 

I »is soluciones, los provectos v los carpetas actúan como contenedores que 
permiten clarificar los módulos de ultimo nivel lisios contienen definiciones 
de clases, por ejemplo asociadas a un formulario, un componente o un ser\ icio, 
l.ste codign siempre podemos verlo en el editor de texto I n algunos casos tam 
bien es posible ulili/ar un disenador para modilicar mdirectamenle ese codi 
go. por ejemplo cuando el modulo corresponde a un formulario 

I n un módulo pueden existir ámbitos con nombre, definiciones de liases, 
propiedades, métodos v eventos, entre otros elementos Mediante la ventana 
Vista de clases podemos obtener un esquema jerárquico de todos esos elemen¬ 
tos, lo cria! simplilica su localización v manipulación, lisia ventana, que puede 
observar en la ligura 2.3, so hace aparecer mediante la combinación de teclas 
Control-Mayús-C o la opcion Ver>Vista de clases 

I os elementos que aparecen en la figura 2.3 son los que existen en el provée¬ 
lo HolaMundo desarrollado en el capitulo previo. Kxisle un ámbito con nombre, 
llamado precisamente HolaMundo, en cuno interior está el modulo Modulel 
l .sle, a su \ ez, cuenta c on un método: Main ( ) Si el provee lo fuese mas i oniple- 
|o. por ejemplo una aplicación Windows con formularios, podríamos acceder 
con esta ventana a sus propiedades v métodos asociados a eventos. 

Utilizando las opciones del menú emergente asociado a cada uno de estos 
elementos, que haremos aparecer con el boten secundario del ratón, podremos 
añadir nuevas Liases al provee lo, nuevos miembros a Lis clases, acceder a la 
definic ión del elemento, mostrarla en el Examinador de objetos, etc Son opcio¬ 
nes que, en su mavoria, se encuentran en el menú principal del entorno, pero 
que resulta mucho más cómodo usar desde el menú emergente. 
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Figura 2.3. Ventana Vista de clases 


Nota 

En la esquina superior izquierda de la ventana Vista de clases hay un botón 
que, al ser pulsado, despliega un menú de opciones. Con ellas puede alte¬ 
rar el orden en que aparecen los elementos en la lista jerárquica. 




Examinando clases y otros elementos 

Una de las ventanas que no se encuentra visible inicialmcnte en el entorno 
es el Examinador de objetos, que puede resultar muy útil para obtener infor¬ 
mación diversa sobre los elementos que formar parte de la aplicación v tam¬ 
bién los que tenemos a nuestra disposición por ser servicios de la plataforma 
Microsoft .NET. 

I a combinación de teclas a usar en este caso es Control-AIt-J I ambién pue¬ 
de utilizar la opción Ver>Otras ventanas>Examinador de objetos para mostrar 
la ventana que se ve en la figura 2.4 ocupando prácticamente todo el espacio 
disponible en el entorno. 
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Figura 2.4. El Examinador de objetos aparece como una página más. 
al mismo nivel que diseñadores y editores 


Como se aprecia, la ventana cuenta con dos paneles claramente diferencia¬ 
dos A la izquierda tenemos la lista de objetos, mientras que a la derecha esta 
la lista de miembros. 

Aparte de poder ver los elementos que lorman parte de la aplicación v sus 
miembros, como en la ventana Vista de clases, en el Examinador de objetos 
podemos acceder también a otros ámbitos y clases. 

Fn la figura 2 4, por ejemplo, se esta examinando la lista de miembros de la 
clase Application, definida en el ámbito System. Windows . Forms. II miem¬ 
bro seleccionado, en la lista de la derecha, es ProductName y, según se índica 
en la parle inferior, es una propiedad de tipo String que puede leerse v mo¬ 
dificarse. 










Acceso a los asistentes 


F.l Explorador de soluciones y la ventana Vista de clases nos permiten co¬ 
nocer v manipular los elementos que existan actualmente abiertos en el entor¬ 
no: proyectos, formularios, clases, métodos, etc. Esos elementos son creados, 
por regla general, mediante el uso de diversos asistentes. Al pulsar el botón 
Nuevo proyecto, o seleccionar ciertas opciones de los menús emergentes de las 
citadas ventanas, estamos abriendo esos asistentes. 

l a mayoría de las opciones que hay en la ventana Nuevo proyecto son asis¬ 
tentes que generan un nuevo proyecto, va sea añadiéndolo a la solución actual 
o bien creando una nueva solución. Estos asistentes, por regla general, no ne¬ 
cesitan ninguna información adicional aparte del nombre del provecto, porque 
son lo suficientemente específicos como para saber que elementos tienen que 
añadir al proyecto. F.n algunos casos, no obstante, sí puede ser necesaria esa in¬ 
tervención Es lo que ocurre ai crear un nuevo proyecto de base de dato o de ins¬ 
talación. En el primer caso podremos elegir una referencia a una base de datos, 
o bien crearla en ese momento, en la ventana de la figura 2.S. l.n el segundo, a! 
crear un proyecto de instalación, aparece un asistente de varios pasos (vease 
figura 2 . 0 ) que nos guia en el proceso que finalmente añadirá los elementos que 
se ajusten a nuestras preferencias. En los menús emergentes de muchas venta¬ 
nas, como Vista de clases o Explorador de soluciones, existen opciones que 
dan paso a asistentes para añadir nuevos elementos generando automáticamente 
el codigo, o un esqueleto, basándose en los datos que introduzcamos. 
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Figura 2.5. Asistente para agregar una referencia a una base de datos 


Desde el Explorador de soluciones, teniendo seleccionado un provecto, pue¬ 
de usar las opciones del menú emergente para añadir un nuevo formula rio, 
una nueva clase, un nuevo componente, eL En todos los casos se crea un nue¬ 
vo módulo de codigo correspondiente al elemento añadido. Son opciones que 
también puede encontrar en el menú Proyecto de la barra principal de menús 
lanío en el menú emergente como en el citado menú Proyecto existe una op¬ 
ción, llamada Agregar nuevo elemento, que da paso a la ventana mostrada en 
la figura 2.7. En ella aparecen, clasificados por tipos, todos los elementos que 




es posible añadir al proyecto. Algunas opciones simplemente añaden un archi¬ 
vo al proyecto mientras que otras, como el Asistente para formularios de datos, 
realizan tareas considerablemente mas complejas, conectando con una base de 
datos, definiendo e! conjunto de columnas y tilas sobre las que va a operarse y 
diseñando una interfaz de usuario para ello 

Además de asistentes, en el menú de opciones de Visual Studio.NI I encon¬ 
traremos múltiples herramientas mediante las que añadir referencias al prov ec¬ 
to actual, generar páginas 111 ¡Vil con información sobre dicho provecto, etc 



Figura 2.6. Asistente para crear un proyecto de instalación 



Figura 2.7. Opciones de la ventana Agregar nuevo elemento 


Diseñadores y editores 


Las clases, los formularios, las páginas HTML, los archivos XMI y. en gene¬ 
ral, todos los elementos que se generan a partir de asistentes v opciones de Vi- 








siidI Basic NET deben ser personalizados, añadiendo los objetos precisos para 
que la aplicación final desarrolle la función que se espera de ella. Con este fin 
utilizaremos diseñadores \ editores diversos, asi como los elementos que apa¬ 
recen en el Cuadro de herramientas. 

Desde el Explorador de soluciones es posible acceder al diseñador y/o edi¬ 
tor <.lel demonio que se tenga seleccionado en ese momento. C on este lin se uti¬ 
lizan los botones reseñados en Ja figura 2.8. El segundo, que se usa para abrir el 
diseñador que corresponda, solo aparece en caso de que el elemento seleccio¬ 
nado tenga asociado un diseñador. 

El editor utilizado es siempre el mismo, si bien su funcionalidad se adapta 
al tipo de archivo sobre el que se este trabajando. Los diseñadores, por el con 
tcario, son específicos v facilitan tareas tan diversas como el diseño de una in¬ 
terfaz de usuario Windows o Web, el diseño de un esquema XML, etc. 
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Figura 2.8. Acceso al editor o diseñador asociado a un elemento del proyecto 


Diseño de formularios 

11 asta ahora no ha utilizado ningún diseñador de Visual Basic .NI I v, como 
supondrá, uno de los más utilizados es el que nos permite diseñar formularios 
para aplicaciones Windows. Su funcionamiento es similar al usado para crear 
interlaces Web ya que, fundamentalmente, su finalidad v comportamiento son 
prácticamente idénticos. En el diseñador de formularios Windows el contene¬ 
dor es una ventana, mientras que en el de formularios Web dicho contenedor 
es una página I ITMI 

Inicie un nuevo proyecto seleccionando el elemento Aplicación para Windows 
de la venían.» Nuevo proyecto. I ras un momento se encontrará con un formula¬ 
rio, con el titulo Forml en la parle superior, v una importante lista de controles 
en el Cuadro de herramientas. I’uede seleccionar algunos controles, pulsando 
sobre ellos con el botón principal del ratón, e insertarlos en el formulario efec¬ 
tuando la misma operación en la posición donde desee colocarlos. Lógicamen¬ 
te tiene que hacerlo uno a uno, es drt ir, no puede seleccionar .simultáneamente 
varios controles. 

Además de componentes visuales, como las etiquetas de texto, las cajas Je 
texto o tus botones, existen otros, por el contrario, que son componedlos no vi 
stiales Si inserta en un formulario un iom ponen te ToolT ip o un ImageLis t, 
por poner dos ejemplos, verá que el diseñador los muestra aparte, en la parle 
inferior (vease la figura 2.9), pero no en el interior del formulario. 
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Figura 2.9. El diseñador muestra los componentes dentro o fuera 
del formulario según su lipo 

A medid.» que vamos insertando componentes en el contenedor, indepen¬ 
dientemente de dónde aparezcan, el diseñador se encargará de actualizar ade¬ 
cuadamente el código Al inseriar un bolón, por poner un ejemplo, el diseñador 
generara el código Visual Basic o I 1TMI para completar la definición de la da¬ 
se o página, según el caso, con la declaración de ese bolón. De manera análoga, 
al modificar sus dimensiones o posición, es el diseñador quien actualiza dicho 
código. 

Mediante el diseñador de formularios podernos mover los componentes, 
cambiar su tamaño y acceder a las opciones de su menú emergente. Por si solo, 
no obstante, nos seria de poca utilidad. Para completar su trabajoson fundamen¬ 
tales las ventanas Propiedades y Cuadro de herramientas. 

Edición de propiedades 

Como acaba de decirse*, uno de los elementos indispensables al trabajar con 
un diseñador es la ventana Propiedades. Pn realidad esta ventana tiene mas 
funciones, va que puede utilizarse también para acceder a las propiedades de 
cualquier elemento que haya seleccionado en el Explorador de soluciones, a 
pesar de que no ha va abierto un diseñador 

l a ventana Propiedades es bastante similar a la que encontramos en Visual 
Basic t>.0 I n la figura 2.10 puede ver indicados algunos de los elementos de la 
mencionada ventana, particularmente la finalidad de cada uno de los botones 
que aparecen en su parle superior. 

I a lista tic propiedades puede aparecer ordenada por categorías, es la op 
non por defecto, o bien alfabéticamente Se altera este orden con los tíos pri 






meros bolones. El siguiente botón se utiliza para mostrar la lista de propieda¬ 
des, que es el estado por detecto. En la parte interior aparece una pequeña des¬ 
cripción de la propiedad seleccionada en ese momento, correspondiente al 
componente que se muestra en la lista desplegable que hay justo debajo del ti¬ 
tulo de la ventana 

r Orden por categorías 
i— Nombre del componerle 


Clase del componente 
Propiedades 
Orden alfabético 


— Nombre de la propiedad 
Valor de la piopiedad 


Descripción de la propiedad 


Figura 2.10. Elementos de la ventana Propiedades 

t uda cuitada de la lisia que ocupa la parte central de la ventana se compo¬ 
ne de dos elementos el nombre de la propiedad y su valor actual. F.l valor de 
una propiedad depende de su tipo, puede ser una cadena de caracteres, un nú¬ 
mero, un v alor de una enumeración, un color o incluso un objeto. 

I as propiedades v los métodos son miembros de un objeto, concretamente 
del componente seleccionado, lii un capitulo posterior aprenderá a delinir es¬ 
te tipo de miembros. Cada miembro, propiedad o evento, dispone de un nombre 
estático, que no podemos alterar, v un valor que suele ser dinámico v podemos 
modificar de distintas íormas, dependiendo del tipo de la propiedad. Propie¬ 
dades como Text. o Ñame, por ejemplo, almacenan una cadena de caracteres, 
un valor que, en la ventana Propiedades, se modilica utilizando el teclado, co¬ 
mo liaríamos en un editor cualquiera. 

Otras propiedades, por el contrarío, muestran directamente una lisia de los 
valores que pueden contener o, incluso, un editor especifico. Observe la lígu¬ 
la 2.1 I. en la cual aparece, en la parte superior, la lisia de valóresele puede lo- 
mai la propiedad DialogResult hn este caso no es necesario introducir el 
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valor utilizando el teclado, basta con desplegar la lista y seleccionar uno de los 
disponibles. Mas abajo puede ver el editor de la propiedad Dock Dicha propie 
dad determina si un componente se adosará en una cierta posición de su con¬ 
tenedor y, en lugar de seleccionar un valor, el editor muestra gráficamente las 
posibilidades disponibles. 



Figura 2.11. Edición de dos propiedades distintas 

Cada evento de un componente puede tener asociado el nombre de un mé¬ 
todo que, como ya sabe, será ejecutando cuando el suceso representado por el 
evento tenga lugar. La lista de eventos de un cierto objeto aparece en la lista 
desplegable que hay en la parte superior derecha del editor de código, en lugar 
de aparecer como una segunda página de la ven la na Propiedades F.slo d he¬ 
rencia a Visual Basic .NI' I de otros lenguajes del entorno que, como C”, si usan 
esa misma ventana. I n la figura 2.12 puede ver la lista de eventos del botón 
que hav en el formulario. 1,1 mecanismo es idéntico al de Visual Basic Ivl) 

Para crear un nuevo método asociado a un evento, primero seleccione en la 
lista de la izquierda el componente que desee y, a continuación, en la lista de la 
derecha el evento I n ese momento se completará la definición de la clase con 
un nuevo método, situándose el cursor en el punto adecuado para introducir 
la implcineiitación. 

Componentes y controles 

lauto la ventana Propiedades como el propio diseñador de formularios se 
usan para modificar objetos o componentes, elementos que podemos encon¬ 
trar, en su mayor parte, en la ventana Cuadro de herramientas. I I Cuadro de 




herramientas dispone de múltiples páginas, cada una de las cuales conliene un 
grupo de componentes, Existen componentes genéricos, que pueden utilizarse 
indistintamente del tipo de provecto que esté desai rollándose, v otros mucho 
más especúleos. Los componentes de acceso a datos, por ejemplo, son del pri¬ 
mer tipo y cuentan con su propia página, míen Iras que los usados en formula¬ 
rios Windows o Web son específicos del tipo de aplicación. 
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Figura 2.12. Edición de los eventos de un componente 


Mediante el menú emergente asociado al Cuadro de herramientas podemos, 
como se aprecia en la figura 2.13. modificar el orden en que aparecen los ele¬ 
mentos, cambiar el modo de visuah/acion entre Lista, el modo por detecto, \ 
lina vista simple de iconos, sin nombres de componentes, también es posible 
modificar los nombres de los componentes, aunque no es algo habitual en los 
componentes originales, y añadir más fichas o páginas a esta ventana P.n la par¬ 
te inferior puede ver una ficha llamada Mis trozos de código, añadida con el fin 
de alojar en ella porciones de código a usar en múltiples proyectos. 

Para cambiar de una pagina j otra tan solo hay que pulsar en los títulos que, 
a modo de botones, pueden verse en la parle superior e inferior, encima y de¬ 
bajo, res pee ti vamente, de la lista cié componentes que ocupa la parte central. Si 
ésta contiene mas elementos de los que es posible mostrar de una sola ve/, tam¬ 
bién vera aparecer en el extremo derecho, arriba y abajo, sendos botones en 
forma de flecha que facilitan el desplazamiento. 

Aparte de tomar componentes y controles del Cuadro de herramientas para 
colocarlos en el interior de un contenedor, este elemento también puede usarse 
en sentido inverso. Teniendo marcado en el editor cualquier porción cié códi¬ 
go, mediante la técnica de arrastrar y soltar podemos alojarlo en la página que 
nos interese del Cuadro de herramientas y darle un nombre. Posteriormente, 




cuando lo necesitemos, podemos recuperar esa porción de código de igual for¬ 
ma. Podríamos decir que el Cuadro de herramientas puede utilizarse como un 
portapapeles persistente, que no pierde su contenido al desconectar v volver a 
iniciar, y tiasificable. 



Figura 2.13. El Cuadro de herramientas y su menú emergente 

Diseñadores adicionales 

Aparte del diseñador de formularios Windows y formularios Web. Visual 
Basic .NET dispone de otros muchos que facilitan la creación de esquemas 
XML, páginas HTML, la estructura de conjuntos de datos, imágenes de mapas 
de bits, iconos v cursores, etc. Cada uno de ellos tiene sus particularidades, si 
bien hay similitudes, por ejemplo, entre el diseñador que se utiliza para los es¬ 
quemas XML y el usado para la estructura de conjuntos de datos, o entre el di¬ 
señador de mapas bits v el de iconos. 

F.n la figura 2.14 puede ver el diseñador de esquemas XML mostrando un 
esquema recién creado. Podas las opciones necesarias para añadir elementos, 
atributos, claves v relaciones se encuentran en el menú emergente asociado a 
cada objeto de los que aparece en el diseñador. Usando el botón que hay en la 
parte inferior del diseñador podemos acceder al código XML, va en el editor 
que revisaremos en el punto siguiente 

El editor de paginas II I MI. es similar al de formularios Web, si bien los com¬ 
ponentes que podemos incluir, alojados en una página distinta del Cuadro de 
herramientas, no son componentes ASP.NF I sino componentes H I MI puros. 

Mediante el editor que aparece en la figura 2 15 se facilita la edición de 
cualquier tipo de imagen que pudiéramos necesitar en el proyecto, va sea un 
gráfico para el fondo de la ventana, un icono o un cursor. I n la parte superior 
del diseñador aparecen las distintas herramientas que es posible utilizar para, 
por ejemplo, dibujar lineas, borrar, insertar texto, etc. 





Figura 2.14. El diseñador de esquenas XML 



Figura 2.15. Aspecto del diseñador de imágenes de mapas de bits 



En lugar de usar el diseñador de imágenes de Visual Basic NET. puede uti¬ 
lizar cualquier aplicación externa, más especializada, y a continuación im¬ 
portar el archivo en la solución mediante las opciones del menú emergente. 






















El editor de código 

I os formularios Windows, los formularios Web, las páginas I ITMl , los es¬ 
quemas XSL, los documentos XML y, en general, si exceptuamos el caso de las 
imágenes, todos los elementos manipulados visualmente mediante diseñadores 
son la representación de un código. Ese código puede, en el caso de los formu¬ 
larios Windows, estar escrito en distintos lenguajes, mientras que en los docu ¬ 
mentos XML, XSI. o HTMl el lenguaje sera, lógicamente, XMI y HTML. 

I I editor de código es siempre el mismo, si bien su comportamiento se adap¬ 
ta al tipo de documento sobre el que está trabajándose. Los distintos elementos 
sintác ticos del documento se diferencian utilizando colores y estilos. Las listas 
desplegables y ventanas flotantes ofrecen informac ión sobre los miembros v 
parámetros de cada elemento a medida que va escribiéndose. I’n la figura 2.16, 
por ejemplo, puede ver cómo al editar un documento XML. basado en el es¬ 
quema de la figura 2.15. el editor, al introducir el símbolo de apertura de mar¬ 
ca, automáticamente nos muestra las que podemos utilizar en ese ámbito. 



Figura 2.16. Edición de un documento XML 


Aparte de los elementos indicados, dependiendo del tipo de documento 
también notará diferencia en los botones que aparecen ¡oslo encima del editor. 
Al trabajar con un dortímenlo XMI tenemos bolones para verificar la \ alíele/ 
del documento o mostrarlo en el explorador Esta barra de botones es diferente 
cuando, por ejemplo, está editándose el código Visual Basic de un formulario 
Windows. 

El editor de código de Visual Basic ,N I I se utiliza como cualquier editor de 
texto, utilizando las mismas tedas y combinaciones de tedas para desplazarse 
carác ter a carácter, palabra a palabra, linea a linea, página a p.fgina. etc l am- 




bien usaremos las mismas combinaciones para copiar, pegar, eliminar, etc 
También puede utilizar el ratón y sus botones para seleccionar porciones de 
texto v, mediante operaciones de arrastrar y soltar, efectuar cambios. 

Ademas de esta funcionalidad básica, el editor de Visual Basic .NT I tam¬ 
bién dispone de comandos que simplifican la aplicación de formato al código, 
por ejemplo indenlándolo adecuadamente u ocultando estructuras como los 
métodos o las clases para facilitar una vista esquemática del contenido. AI 
efectuar operaciones con el porta papeles podemos utilizar las habituales com¬ 
binaciones de tecla, pero también recurrir al anillo del portapapeles que apare¬ 
ce en el Cuadro de herramientas. 

Si bien la función principal del editor de código es, como su propio nombre 
indica, permitir la edición do archivos de código, mediante las opciones exis¬ 
tente.!» en el menú contextual puede utilizarse este mismo edilor para controlar 
algunos aspectos de la depuración del proyecto. 


Otras herramientas 

Los editores y diseñadores, conjuntamente con la ventana Propiedades v el 
Cuadro de herramientas, son los elementos que podríamos considerar básicos 
del entorno, ya que resultan indispensables para realizar nuestro trabajo: desa¬ 
rrollar aplicaciones. No son, sin embargo, los únicos elementos, hav otros mu¬ 
chos y. lógicamente, lodos ellos son útiles. 

Algunas de las ventanas que van a mencionarse a continuación no están vi¬ 
sibles en principio. Tendrá que utilizar la correspondiente opción del menú 
Ver o del submenú Ver>Otras ventanas para hacerlas aparecer. 

El Explorador de servidores 

Al desarrollar una aplicación podemos necesitar componentes adicionales, 
no disponibles en el Cuadro de herramientas, como puedan ser conexiones con 
bases de datos, colas de mensajes y otros servicios que haya instalados en el 
sistema. En lugar de utilizar una herramienta externa, o escribir el codígo ne¬ 
cesario para acceder a esos servicios, podemos servirnos del Explorador de 
servidores. Esta ventana aparece, inicialmente, en el margen izquierdo del en¬ 
torno de Visual Basic .NF.T, pero ya sabe que puede recurrir al menú de opcio¬ 
nes para hacerla aparecer. 

En la ventana Explorador de servidores encontraremos, en principio, dos 
elementos: Conexiones de datos y Servidores. El primero de ellos actúa como 
raíz de todas las conexiones de datos que podamos tener definidas, mientras 
que el segundo es la raíz de los servidores, ordenadores, a los que tengamos 
acceso. I a lista de conexiones de datos en principio estara vacia, mientras que 
en la de servidores aparecerá el ordenador local. 

Utilizando las opciones del menú emergente de cada nodo podremos defi¬ 
nir nuevas conexiones de datos, asi como registrar otros servidores que pueda 



haber en nuestra red para acceder a sus servicios. También puede usar con esto 
lin dos de los botones que hay en la parte superior de !a ventana, concretamen¬ 
te los que tienen un signo + junto al icono de una base de datos y un ordenador. 

Desplegando una conexión de datos podrá acceder a los distintos elemen¬ 
tos que haya en la base de datos: tablas, vistas, procedimientos almacenados, 
etc. Análogamente, abriendo la rama de un servidor tendremos acceso a sus 
serv icios: colas de mensajes, servidores de datos y servicios de informes entre 
otros. En la figura 2.17 puede ver abiertas las dos ramas mostrando una co¬ 
nexión de datos y los servicios del sistema local. Usando la técnica do arrastrar 
y soltar puede insertar en el diseñador cualquiera de los elementos mostrados 
en el Explorador de servidores, creando adaptadores de datos, informes o con¬ 
troladores de servicios. 
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Figura 2.17. Ventana del Explorador de servidores 


Tareas- pendientes 

Otro de los elementos nuevos de Visual Basic .NET. inexistente en versio¬ 
nes previas, es la lista de tareas. En dicha lisia aparece información recogida 
del código de los diferentes módulos que componen el provecto. Cada ve/ que 
se encuentra un comentario que comienza por las palabras TODO, HACK o bien 
UNDONE el comentario es tratado como una entrada de la lista de tareas, extra¬ 
yéndose su localización, estado, persona responsable, prioridad, etc También 
aparecen en dicha lista otros elementos, por ejemplo mensajes de error por ta¬ 
llos en el código. 

Los elementos que aparecen en la Lista de tareas, cuyo aspecto por detecto 
puede ver en la figura 2. 18, y su orden, dependen de las opciones que se havan 
seleccionado en el menú Ver>Mostrar tareas. También es posible usar el menú 
emergente, como se aprecia en la citada figura, para seleccionar la listo de ta¬ 
reas a mostrar. Igualmente, podemos modificar el orden con tan sólo pulsaren 
el encabezado de una de las columnas. 

Partiendo de la lista de tareas, basta un doble clic sobre cualquiera de los 
elementos para acceder al punto exacto del código en el que se espera la ac- 






ción. De estd forma es mucho más fácil llevar un control de los trabajos pen¬ 
dientes que hav en el proyecto. 
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Figura 2.18. Aspecto de la Lista de tareas 


La ventana de comandos 

Visual Basic NFT cuenta con un entorno totalmente conligurable, en el que 
cada objete» di* los que ve puede ser utilizado programáticamente, desde códi¬ 
go. como haríamos con cualquier otro objeto de una aplicación. Mediante la 
Ventana de comandos (véase la figura 2.19) es posible usar esos objetos para, 
de manera interactiva, efectuar cualquier operación que deseemos. Fs posible, 
por ejemplo, iniciar un nuevo proyecto o abrir un archivo sin necesidad de re¬ 
currir a las opciones del menú de Visual Basic NF I 

La Ventana de comandos resulta interesante si vamos a programar macros 
o crear proyectos de añadidos para el entorno de Visual Basic .NET, va que nos 
permiten comprobar el funcionamiento de los distintos objetos que forman 
parte de ese entorno de manera directa. También será útil durante la depura¬ 
ción de una aplicación para, por ejemplo, comprobar o modificar el valor dé 
una variable o ejecutar en modo intérprete cualquier sentencia que pudiera in¬ 
teresarnos. 



Figura 2.19. Introducimos una orden en la Ventana de comandos 













La ayuda de Visual Basic .NET 


Visual Studio .NI I os un entorno Jo derla complejidad en el que podemos 
ufili/ar múltiples lenguajes, entre ellos Visual Basic NI' I, infinidad de compo¬ 
nentes v. por supuesto, todos los servicios disponibles en la plalulorma Microsoft 
NI I.C .ula uno de estos elementos cuente! con su respectiva ayuda, recurso in¬ 
dispensable para poder aprovechar todas sus posibilidades. 1 a ayuda se en¬ 
cuentra en los CD-ROM 2 y 1 del producto. 


Nota 

Recuerde que este libro se ha redactado usando una versión preliminar de 
Visual Studio .NET, por lo que la distribución del contenido en los CD-ROM 
del producto definitivo podría ser distinta. 


I odas las opciones relativas a la ayuda las enconl rara en el menú del mismo 
nombre Desde el podrá accederá la tabla de contenidos, buscar una cierta pa 
labra clave, establecer filtros, etc I .a ayuda se muestra, por delecto, como una 
pagina más en el a rea de contenido del entorno, igual que lo haría un diseñador 
o el editor de código. 

Lna novedad, relativa a la avuda. es la existencia de la ventana Ayuda diná¬ 
mica, que puede ver en la parte interior derecha de la figura 2.20. Si mantiene 
abierta esta ventana vera que, a medida que introduce código, selecciona rom 
ponentes o abre ventanas, aparece una lista de lemas do avuda relacionados 
i on el contexto en el que se encuentre. I ógica mente, puede seguir utili/ando l.i 
tecla 1*1 para acceder a una avuda sensible al conlexto. pero la ventana Ayuda 
dinámica siempre aporta más información 

Con las opciones del menú Ayuda también puede acceder al servicio técnico 
de Microsoft, asi como obtener información relativa a la versión controla de 
Visual Basic .NH I o Visual Studio NI I que oslé utilizando, los lenguajes v he¬ 
rramientas instalados, eh I n la figura 2.21. por ejemplo, se puede ver que el 
entorno de desarrollo es la versión 7 0 9254 y que, aparte de Visual Bastí NI I. 
también están disponibles Visual O Nl l, Visual C -m Nl l Crvstal ReporK 
para Visual Studio NFT v Application Cenler Test. 

Adaptación del entorno 

H entorno de Visual Ba.su Ntl es personali/able v aulomati/able. de tal 
manera que podemos adaptarlo a nuestras preferencias haciendo mas fácil \ 
rápido nuestro trabajo habitual. Al principio del capitulo si» indico como modifi 
tar la disposición \ comportamiento de las ventanas, ton las que leñemos que 
trabajar continuamente, v poco más. I n este punto nos ocuparemos con m.ivm 
detalle de la personalización de este entorno. 






In thl* Srction 
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Figura 2.21. Información sobre el entorno de desarrollo 
y herramienlas instaladas 

Recuerde ijue medúmte el aportado Mi perfil de l.i Página de inicio se* puede 
seleccionar una configuración por delecto para la disposición de Lis ventanas \ 
las combinaciones de teclado. 

I’arlieiulo de esa confilinación por detecto, sin embarco, podemos efectuar 
los cambios <|ue consideremos oportunos. 


Figura 2.20. La ayuda de Visual Sfudio.NET 
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Nota 

Recuerde que puede hacer aparecer la Página de inicio mediante la opción 
Ver>Explorador Web>lnicio del menú principal. 


Opcionee del entorno 

Fl entorno de Visual Basic .Nl\T no sólo se compone de ventanas que, como 
acabamos de ver. podemos situar donde mas nos convenga y cuyo comporta¬ 
miento podemos personalizar, también existen otros elementos \ multitud de 
opciones para configurarlos Todas esas opciones las encontrará en la ventana 
que se muestra en la figura 2.22, a la que puede acceder mediante la opción 
Herramientas>Opciones. 
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Figura 2.22. Ventana con opciones generales del entorno 


I a lista que hay a la izquierda muestra múltiples carpetas con elementos, 
caita uno de los cuales corresponde a un conjunto de opciones que aparecen en 
el espacie» que hav a la derecha. Como puede ver, la lista es bastante extensa \, 
de acorde con ello, el numero de opciones muv importante. Con ellas puede 
prácticamente personalizar i ualquier elemento: los estilos \ colores que se uti 
tizan para realzar la sintaxis en el editor de código. Lis combinaciones de teclas 
asociadas a opciones \ acciones, las palabras clave que reconocerá la liMa de 
tareas, eli. (. orno se aprecia en la parte iníerioi de la figura 2 22. siempre te¬ 
nemos «i nuestra disposición el bolón Ayuda para aprender más sobre el signi- 
lú ado o la utilidad de las opciones que aparecen en la v en lana. 

I n la parle superior de la página General de la carpeta Entorno, que es la 
que aparece abierta por delecto, encontramos tinos botones que nos permiten 
alternar entre los tíos mecanismos posibles de distribuí ion de las \ entanas del 
enlomo: usando ventanas adosadas o ancladas, que es el modo por detecto, o 
bien utilizando un entorno clasico M 1)1. ruede seleccionai la opiion Entorno 
MDI v reiniciar el entorno para ver la dilerencia. 





Configuración do botones y menús 

! n la parlo superior del enlomo de Visual Basic NI I aparen en varias pale¬ 
tas de bolones que facilitan el acceso rápido ¿i las opi iones mas habituales, asi 
como un menú donde se enenentran prácticamente todas las opi iones disponi¬ 
bles. Las paletas de botones cuentan ton un tisii, en el extremo izquierdo, de la 
mal podemos tomarlas para llevarlas a cualquier otro punto, disponiéndolas 
horizontal o verticalmente en los márgenes del entorno o bien dejándolas como 
ventanas dotantes. 

La configuración de las paletas do botones no es estática, podemos tanto 
ocultar como mostrar paletas de bolones, asi como modificar los botones con¬ 
tenidos en ellas. Igual ocurre con los menos de Visual Basic NI I 

.-•Hí^ ción dr paleta# visibles^ 

Inicial mente, en el entorno de Visual Basic NI I tan solo aparecen dos de 
Lis paletas de botones que hav disponibles. La primera de ollas, conocida mino 
Estándar, aloja los botones que nos permiten guardar \ abrir archivos v proveí 
I os, electuar las habituales tareas de edición v acceder a ventanas de uso in¬ 
tensivo como el Cuadro de herramientas o la v entana Propiedades I .1 segunda 
paleta, conocida como Web. cuenta con los bolones típicos do exploración que, 
por ejemplo, a la hora do acceder a la ayuda nos permiten ir hacia atrás v ade¬ 
lante, modificar el lamano de letra, ele 

Aparte de rslas dos, Visual Basic .NI I cuenta con al menos veinticinco pa¬ 
letas mas. I’uede acceder a ellas pulsando sobre las paletas de bolones \ jsjbles 
con el bolón secundario del ratón. Se desplcgar.venlom es un menú como el de 
la ligera 2.23, en el que puede marcar v desmarcar Lis paletas que desea hacer 
v isibles. Como puede ver en esa figura, hav paletas de bolones especificas para 
el trabajo con archivos I I l'ML o X.V1L. edición de imágenes, diseño de dalos, etc. 

Lo normal es que activemos tan sólo las barras de botones que necesitemos 
en cada momento va que, de lo contrario, no tendríamos espacio suficiente en 
pantalla .1 monos que contemos con un monitor con mucho espacio de visual i/a 
v ion y trabajando con una resolución relativamente alia. I n la ligur.i 2.24 se 
puede ver cómo queda el entorno de Visual Studio NI I Iras activar ludas las 
paletas de botones disponibles en principio. 

Una alternativ a, a la hora de moslrar \ ocultar barras de botones, consiste 
en usar la opt. ion Personalizar que aparece al I inal de la figura 2 23, abriendo la 
ventana de personalización de opciones de menú v botones. I sla ventana dis 
pone de tres paginas diferentes, abriéndose por defecto la llamada Barras de 
herramientas Ln ella, como se aprecia en la figura 2 23, existe una lista en la 
que aparecen todas las paletas de bolones \ podemos marcar v desmaixar para 
mostrarlas u ocultarlas, respectivamente 

Añadir y eliminar botones* 

(. Hmo acaba de dei irse, en las paletas de bolones tan solo aparecen represen¬ 
tadas las operaciones que se utilizan de manera mas o menos Ireí líente. I sla 



configuración, sin embargo, puede depender en parle del usuario de la herra¬ 
mienta, ya que no todos seguimos los mismos pasos para efectuar un cierto 
trabajo. Por ello, es posible lanío quitar botones existentes en una paleta como 
añadir otros nuevos 



Figura 2.23. Menú para mostrar/ocultar paletas de botones 

I a segunda pagina de la ventana Personalizar, llamada Comandos, cuenta 
con dos listas: la de la izquierda contiene varios grupos de comandos, mientras 
que la de la derecha muestra los comandos existentes en el grupo seleccionado 
a la izquierda. Mientras tengamos abierta esta ventana, que puede ver en la fi¬ 
gura 2.2b. podemos utilizar la técnica de ¡imi<lnu 1 / soltttt tanto para eliminar 
botones de las paletas de herramientas que hay visibles como para añadirlos, 
tomándolos de la lista Comandos \ situándolos en la posición que deseemos 
de la paleta. 

Nota 

Para eliminar un comando existente en una paleta pulse sobre él con el bo¬ 
tón principal del ratón y arrástrelo hasta situarlo fuera de la paleta, en cual¬ 
quier punto de la pantalla. 
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Figura 2.24. Activamos todas las paletas de botones disponibles 
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Figura 2.25. Otra forma de mostrar y ocultar barras de botones 


Añadir y eliminar menús de opci ones 


Usando la misma técnica que acaba de describirse en el punto previo, arras¬ 
trando comandos a las paletas de botones y tuera de ellas, también podemos 
adaptar la configuración de los mentís de Visual Basic. Los comandos pueden 
situarse en la barra de mentís como nuevas opciones principales o bien como 























opciones simples de un menú va existente I£n la figura 2-27, por ejemplo, pue¬ 
de observar como añadimos al menú Proyecto, ya existente, el comando Guar¬ 
dar todo, de tal manera que podamos ejecutar dicha acción también desde este 
menú. 
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Figura 2.26. Lista de tos comandos disponibles para alojar 
en paletas de botones 
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Figura 2.27. Añadimos opciones a un menú existente 






I I mrníi emergente que aparece sobre Id opcion recien añadida lo liemos he¬ 
cho aparecer con el bolon secundario del rutón, como es habitual. Con sus op- 
i iones podemos modificar el titulo de Id opcion, asignarle un icono distinto, 
iniciar un grupo de opciones, etc. 

( ración ár nueva*) paletas y wenúe 

Además de añadir nuevos elementos a las paletas de botones v menus de 
opciones va existentes, también tenemos la posibilidad tanto de crear nuevas 
paletas como de añadir nuevos mentís al entorno. C omencemos viendo los pa¬ 
sos que es necesario dar para crear una nueva paleta de jolones o comandos 
ln la pagina Barras de herramientas de la ventana Personalizar, según ha 
podido verse en una figura previa, existe, a la derecha, un bolon llamado Nue¬ 
va Al pulsarlo aparecerá una nueva paleta de bolones, vacia v Motante Pode¬ 
mos disponerla en cualquier punto del entorno, donde nos interese, v después 
lisai la misma técnica descrita antes para añadir los comandos que deseemos 
tener en esa nueva paleta. 

l a figura 2.2K muestra lina paleta de herramientas, a Ja que liemos llamado 
muv originalmente MiPaleta, que dispone de cinco botones con tareas que, se 
supone, realizamos habilualmente. 



Figura 2.28. Una nueva paleta de botones 


Si lo que deseamos es crear un nuevo menú, tendremos que seleccionar el 
ultimo elemento de la lista Categorías en la pagina Comandos de la misma ven¬ 
tana. A la derecha cera aparecer un único comando Nuevo menú Arrástrelo 
hasta situarlo en la barra de menus, como se ha hecho en la figura 2.2 C *. o, si lo 
prefiere, en el interior de una barra de bolones, creando asi un menú desplega 
ble Una vez creado el menú, pulse el botón secundar io del ratón sobre el para 
establecer el nombre \ modificar cualquier otra propiedad 

Añadido el menú, el proceso para insertar en el opciones u otros menus es 
idéntico al descrito en el punto previo. Fn la figura 2.20 puede ver el menú tras 
haber añadido tinco opciones. 

Opciones Ai versas 

l a ventana Personalizar cuenta, como se decía anteriormente, con tres pagi 
ñas distintas l n la tercera, titulada Opciones, encontrara distintas opi iones que 
afei tan a las barras de botones v menus de opciones estableciendo, por ejem 
pío, el tamaño de los iconos, los efectos de animación al desplegar un menú, la 
aparición de las combinaciones de tecla a! situar el puntero del ratón sobre un 
botón, etc. 

Quiza lo mas interesante de esta ventana sea el bolon Teclado el cual apare¬ 
ce en la parte interior. Al pulsarlo vera aparecer una ventana como la de la ti- 
gura 2.31. Hn realidad es la ventana de opciones del entorno que aparece con el 




elemento Entorno>Teclado va seleccionado. En la lista que ocupa la parte cen¬ 
tral aparecen todos los comandos disponibles en el entorno, mientras que justo 
debajo se indican las combinaciones de tecla para ejecutarlos sin necesidad de 
recurrir a botones m opciones. Lógicamente, podemos tanto modificar las asig- 
naciones existentes como añadir atajos de teclado a opciones que no contasen 
con ellos. 



Figura 2.29. Añadimos un nuevo menú al entorno 
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Figura 2.30. Nuevo menú de opciones 


Configuración de herramientas externas 

Aunque Visual Basic NI . P cuenta, como ha podido ver y verá en los distin¬ 
tos capítulos do este libro, con un entorno que tiene infinidad de posibilidades, 
está claro que no puede integrar absolutamente todos los recursos que un pro- 




gramador pudiera necesitar para efectuar su trabajo, desde el primen» hasta el 
último. I s por eso que desde Visual Basic .NF.T resulta posible acceder a herra¬ 
mientas externas, para lo cual tan sólo hav que definir la configuración apro¬ 
piada para ejecutarlas. 



Figura 2.31. Configuración de los atajos de teclado 


Si abre el menú Herramientas encontrará en el opciones para ejecutar algu¬ 
nas herramientas externas, como comprobador de controles ActiveX, el gene¬ 
rador de CjUIL) o bien el Visor de objetos Ol í v COM. l-stas son herramientas 
externas va preconfiguradas. Para añadir cualquier herramienta adicional uti¬ 
lice la opción Herramientas externas de ose mismo menú, abriendo la ventana 
mostrada en la figura 2.32 lín ella aparece una lista con todas las aplicaciones 
configuradas en este momento. Al seleccionar cualquiera de ellas, en la parte 
inferior aparecen el título, comando de ejecución y argumentos, entre otros da¬ 
tos I os botones que aparecen a la derecha permiten añadir y eliminar opcio¬ 
nes del menú, asi como establecer el orden. 









Pulsando el botón Añadir aparecerá un nuevo elemento en la lisia. Usando 
los controles que hay en la parte interior configuramos el título v los parámetros 
Ivstos pueden seleccionarse de una lista desplegable, como se aprecia en la li- 
gura 2.33. I n ese caso se esta configurando una opción, llamada Bloc de notas, 
que al ejecutarse abrirá en dicha aplicación el modulo de código fuente sobre el 
que estemos trabajando. De manera análoga podríamos configurar cualquier 
otra herramienta. 
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Figura 2.33. Añadimos una nueva herramienta externa 

Automatización á& tareas 

fu el trabajo diario es corriente que existan tareas maso rítenos repelí ti\as, 
no complejas pero en las que se emplea un cierto tiempo precisamente por la 
frecuencia con la que hav que realizarlas. V isual Basic .NI*. I cuenta con diver¬ 
sos mecanismos para automatizar esas tareas, desde la programación de nuevos 
asistentes hasta el registro v reproducción de manos. í’ste ultimo os, segura¬ 
mente, el método mas simple, poro no por ello con menos posibilidades. I \ ade¬ 
más, un recurso nuevo, inexistente en versiones previas de Visual Basii 

l as manos pueden crearse de dos maneras distintas, registrando las accio¬ 
nes efectuadas con el teclado y el ratón o bien codificándolas manualmente. Lina 
ve/ existen, pueden ejecutarse desde una opción de menú, con una combinación 
de teclado o pulsando un botón. 



Registro de una nueva macro 

Comencemos por el principio, registrando l.i que sería nuestra primera nía 
oo en \'isuaJ Basic NT I Con este tm seleccionaríamos la opción Herramien- 
tas>Macros>Grabar TemporaryMacro. I .imbien podemos pulsar la combinación 
de ledas May us-C ontrol-R para conseguir exactamente la misma .u i ion. 

Al iniciar el registro de una nueva macro veremos aparecer como ventana 
liolanle la paleta de botones mostrada en la ligura 2 24. Con el primer botón 
detendremos momentáneamente el registro, con el segundo lo finalizaremos \ 
con el tercero cancelaremos la graba» ion 


trfdbaiiui * 

•4. % % 

Figura 2.34. Paleta de bolones para controlar el registro de una macro 

Durante el registro de la macro podemos utilizar las opciones del mentí, los 
bobines disponibles en las paletas, podemos realizar las tareas habituales de 
diseño en los lormularios o en el codigo fuente. Cualquier acción sera registra¬ 
da \ traducida a ordenes que, finalmente. serán las que compongan la macro. 
Puede, por ejemplo, introducir un texto cualquiera en el editor de codigo \ co¬ 
piarlo varias vn es. 

Ejecución de una macro 

Al finalizar el registro de la mac lo, pulsando el segundo de los botones exis¬ 
tentes en la paleta, esta desaparecerá v la macro quedara almacenada en un es¬ 
pacio temporal. Para ejecutarla tan solo tenemos que pulsar la combinación 
May tis-Control-P. o bien usar la opt ion Herramientas>Macros>E|ecutar Tempo¬ 
raryMacro Al hacerlo, vera como se reproduce la inserción del texto que intro 
dujo durante el registro. 

I 11 este momento la macro esta, como se ha dicho, almacenada de forma 
tempoi al \ slo significa que el registro de una ntiev a ma» io eliminaría a esta que 
tenemos. Si liemos creado una macro útil, que puede servirnos en otras ocasio¬ 
nes e inc luso otros provéelos, lo normal es que la guardemos. Para ello usare¬ 
mos la opción Herramientas>Macros>Guardar TemporaryMacro Aparecerá el 
Explorador de macros (vrase la ligura 2.3A) invitándonos a asignar un nombre 
a esa macro temporal. De esta forma podemos guardar tantas macros corito ne¬ 
cesitemos. 


Nota 

Teniendo el Explorador de macros abierto, podemos ejecutar cualquier 
macro simplemente haciendo doble clic sobre su nombre, sin necesidad de 
acceder a opción de menú alguna. 






Figura 2.35. Asignamos un nombre a la macro recien registrada 

Código de la macro 

Utilizando las opciones del menú emergente asociado a cada elemento del 
Explorador de macros podemos acceder al código tírente de cada una de ellas. 
Por ejemplo, pulsando el botón secundario del ratón sobre la macro que acaba¬ 
mos de registrar v seleccionando la opción Editar, nos encontraremos con una 
ventana como la de la figura 2.3(> Es el editor de macros de Visual Basii NI I 
un punto desde e I cual podemos tanto explorar el código de las macros exis¬ 
tentes como modificarlo o, incluso, croar nuevas macros directamente, introdu¬ 
ciendo el código Visual Basic apropiado. 

Para codilicar una macro se utiliza el modelo de objetos de Visual Studio 
.NI I, un modelo en el que cada elemento del entorno está representado por un 
objeto, un modelo en el que cada acción que realizamos mediante el teclado o 
ratón tiene una correspondencia con un método de un objeto I n la figura 2.3b 
puede ver cómo se lisa el objeto ActiveDocument para acceder a la selección 
de texto del documento actual, usando métodos como Copy( ) \ Paste( ) pa¬ 
ra copiarlo v pegarlo Lógicamente, para sacar el mejor provecho de las macros 
es indispensable conocei a fondo este modelo de objetos, un tema que, por su 
extensión v complejidad, queda fuera del ámbito de osle libro. 


Puntos clave 

• Los provectos Visual Basic .NF.T se agrupan en solucione s. Un provecto 
puede contener formularios, módulos de código, archivos de recursos \ 
otros elementos adicionales. 

• Los módulos correspondientes a elementos visuales, como formularios o 
imágenes, se editan usando los diseñadores existentes en el entorno, con 
la ayuda de ventanas como Propiedades y Cuadro de herramientas 

• F.I código asociado a esos elementos, asi como cualquier otro código del 
provecto, se manipula en un editor de texto con realce sintáctico v tecno¬ 
logía Inlclli^rn^r de ayuda a la edición. 
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Figura 2.36. Editor de macros de Visual Studio NET 


• I «i baso del desarrollo con Visual Basic .NK'I sigue siendo el uso de com¬ 
ponentes v controles Estos so insertan on contenedores, como por ejem¬ 
plo pueden ser los formularios, y se personalizan mediante propiedades 
v eventos. 

• Id entorno de desarrollo cuenta con un modelo de objetos que facilita su 
control mediante comandos. I se mismo modelo puede usarse para auto¬ 
matizar tareas o crear nuevos asistentes 

• I as ventanas existentes en el entorno pueden anclarse unas a otras, api¬ 
larse en múltiples páginas o quedar como Ilutantes, todo ello mediante 
operaciones de arrastrar y soltar. 

• Otros elementos del enlomo, como las paletas de botones y los nienus de 
opciones, pueden adaptarse a nuestras preferencias. Recuerde utilizar el 
botón secundario del ratón sobre cualquier elemento para acceder a sus 
opc iones. 

• la automatización do la reas resulta posible V sencilla gracias a la nueva 
posibilidad de registrar v reproducir macros 







Resumen 


Tal v como ha podido ver en este capitulo, el entorno de Visual Basic Nl'T 
cuenta con multitud de elementos algunos de los cuales, sobre tocio los tunda- 
mentales, ha conocido con algo más cié detalle También se ha tratado la perso¬ 
nalización de ese entorno, asi como la automatización de tareas mediante el 
uso de macros. 

Los elementos descritos con más profundidad, como los diseñadores o el edi¬ 
tor, son seguramente los más utilizados, pero hay otros muchos que ni siquiera 
se han mencionado, como las ventanas de depuración, el esquema de documen¬ 
to. etc Algunos de ellos tendrá ocasión do conocerlos en posteriores capítulos 
Ln el campo de la automatización tan sólo se ha abordado el registro v re¬ 
producción de una macro simple, una ni aero que hemos almacenado con un 
nombre para poder usarla siempre que nos intereso. Conociendo el modelo de 
objetos de Visual Studio .NET tenemos también otras posibilidades, romo la 
creación de asistentes o añadidos al entorno. En la ventana de creación de nue¬ 
vos proyectos encontrara opciones que generan un esqueleto para este tipo de 
elementos. 
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La plataforma 
Microsoft .NET 


I I desarrollo de aplicaciones en general, v en particular en el enlomo del 
sistema operativo Windows, ha cambiado mucho en la ultima década, desde la 
aparición de la primera versión de Visual Basic, y, especialmente, desde la di¬ 
fusión a escala global do Inlernel asi como la mayor presencia de dispositivos 
móviles. 

I lace diez años las aplicaciones se creaban usando un mismo lenguaje para 
todas las tareas y para un sistema operativo concreto, escenario que ha ido ha¬ 
ciéndose más y nías complejo en los últimos años. 

Las primeras aplicaciones para Windows se desarrollaban usando el len¬ 
guaje C y llamadas directas a las funciones del AH de Windows lista tormo de 
exponer los servicios propios del sistema, a través de cientos o miles de funcio¬ 
nes independientes, era general a todos los sistemas operativos, til trabajo era 
realmente complejo, siendo necesario el trabajo intensivo con punteros y mane¬ 
jad ores (lumciie*), para facilitar parámetros de la aplicación al sistema y vice¬ 
versa. con el consiguiente peligro de incurrir en fallos mas o menos típicos: la 
no liberación de bloques de memoria que quedan perdidos, reutilización de un 
puntero con direcciones de datos ya liberados, uso del manejador inválido al 
llamar a una función, etc. 

Para simplificároste esquema, v ayudar a los programadores haciendo más 
fácil su trabajo, se buscaron soluciones siguiendo caminos paralelos, e incluso 
a veces divergentes, dentro de la propia Microsoft. 

Asi, por una parte nació Visual Basic para facilitar el desarrollo de aplica¬ 
ciones simples con interfaz de usuario, ocultando todos los detalles de comuni¬ 
cación con el sistema. Tan sólo había que usar unos controles, conocidos como 









VBX, pura diseñar las ventanas v utilizar un mecanismo de propiedades v even¬ 
tos para controlar el flujo de la aplicación. 

l£n contraposición, a los programadores que utilizaban C se les ofreció como 
solución el lenguaje C++, orientado a objetos pero con la misma complejidad v 
debilidad que C, y una biblioteca de clases, llamada MFC' (Alit rosofl Foundation 
C/rts>es), que hasta cierto punto encapsulaba en objetos la funcionalidad usada 
mas habitualmente del API de Windows. 

Paralelamente a Visual Basic y las MFC surgió COM (Componen! Objeet Ale 
del), un modelo de objetos que tenía por objetivo hacer posible la reutilización 
de componentes binarios sin importar las diferencias entre lenguajes. COM, no 
obstante, siempre ha sido muy complejo y su éxito se debo, en parte, al éxito de 
Visual Basic 3 y b, con los que resultaba muy fácil crear osle üpo de componen¬ 
tes, y el ofrecimiento de una biblioteca de plantillas, la ATI (Active Témplate l /- 
Fian /), que, conjuntamente con una serie de asistentes, allanaba su desarrollo 
en C++. 

Nuevas necesidades 


Todo el escenario que acaba de exponerse se ciñe al desarrollo de aplicacio¬ 
nes para un sistema operativo: Windows. Fste escenario adquiere mayor com¬ 
plejidad debido a dos factores fundamentales: la necesidad de aprovechar las 
posibilidades que ofrece la red Internet y la cada ve/, mayor presencia, ¿necesi¬ 
dad?, de llegar con la información a lodos lados mediante dispositivos móviles 
tales como teléfonos celulares, asistentes digitales personales \ dispositivos 
parecidos. 

Para cubrir estas necesidades, relativamente recientes, también se han segui¬ 
do varios caminos paralelos Con el lin de crear aplicaciones para Internet pue¬ 
de utilizar ASP (Active Server Pogr), conjuntamente con un lenguaje de guiones* 
como JScript o VBScript, o bien ISAPI (Internet Information Server \FI), usando 
C++ para crear módulos que solo luncionan con IIS. Con Visual Basic b, gracias 
a la integración de COM tanto en 11S como en el lenguaje, se facilitaba el desa¬ 
rrollo di* este tipo de proyectos 

Fn cuanto a las aplicaciones móviles, prácticamente se ha contado con los 
mismos entornos de desarrollo existentes para Windows, como Visual C’-h- \ 
Visual Basic, pero modificados para ajustarse a las limitaciones de un sistema 
operativo embebido como es el usado en los Pocket PC . 

Con el lin de agrupar bajo un mismo nombre todos los servicios necesarios 
para este lipo de aplicaciones, servic ios como ASP, ADO o los servicios de com¬ 
ponentes COM-, nace la denominación Windows DNA (Dhlvibutetí Internet 
Architeelnre). 

Fn resumen, podríamos decir que a medida que han ido surgiendo las nece¬ 
sidades se han hecho añadidos tanto al sistema operativo como a las herra¬ 
mientas de desarrollo* añadidos heterogéneos que en unas ocasiones vienen en 
lorma de mas tunciones tipo API, en oirás como componentes COM que se in¬ 
tegran en el sistema v en otras como asistentes para los entornos de desarrollo 



.NET, ¿la solución definitiva? 


El resultado de esta década de evolución en el desarrollo de aplicaciones, 
en general y particularmente en el entorno de Windows, lia tenido como resul¬ 
tado la existencia actualmente de multitud de servicios duplicados, específicos 
para un determinado lenguaje o herramienta, v pocas posibilidades reales de 
reulili/.acion del código, al tiempo que el propio sistema ha ido ganando en com¬ 
plejidad de manera vertiginosa. 

La solución, quizá definitiva, que propone Microsoft para solventar esta 
situación es la plataforma NET. Ésta consta di' un conjunto de servicios uni¬ 
versales, idénticos para lodos los lenguajes, al tiempo que mantiene la integra¬ 
ción con los desarrollos existentes y hace posible una interoperabilidad entre 
lenguajes desconocida hasta el momento. Aunque actualmente la plataforma 
.NE I solo está disponible para Windows 98, Me, NT, 2000 v XP pronto apare¬ 
cerá una versión compacta para dispositivos móviles, al tiempo que no se des¬ 
carta la aparición en otros sistemas operativos, como Linux. 

Para desarrollar aplicaciones .NET puede usarse prácticamente cualquier 
lenguaje de programación, desde C++ V Visual Basic hasta el nuevo Visual C 
pasando por COBOI , Perl, Pascal, lava o Pvthon. No tenemos, por tanto, que 
utilizar obligatoriamente un determinado lenguaje. Los servicios de la platafor¬ 
ma, lanío la biblioteca de compórtenles como los servicios básicos, son expues¬ 
tos de forma idéntica a todos los lenguajes, de tal manera que todos ellos tienen 
las mismas posibilidades. Podemos, por tanto, crear un componente de servi¬ 
dor con múltiples hilos de ejecución utilizando Visual Basic .NL l o una intertaz 
Web sirviéndonos de Visual C++ .NET. 

La plataforma NET no sólo hoce posible el desarrollo de componentes \ 
aplicaciones para Windows, que sigue siendo uno de los primeros objetivos de 
la mayoría de los programadores, sino también la creación de aplicaciones \ 
servicios Web. aplicaciones de consola, bibliotecas de clases genéricas, aplica¬ 
ciones para dispositivos móviles, etc. Es, por tanto, un recurso adaptado a las 
necesidades actuales, trente a las soluciones antiguas v reiteradamente actuali¬ 
zadas o jhtri hcdtitis a lo largo de los años. 

Desde las aplicaciones .NL I puede seguir utilizándose el API di* Windows 
\ los componentes COM. De manera análoga, los componentes .NI I pueden 
ser utilizados por aplicaciones clásicas también a través de COM. No se rompe», 
por tanto, con los provectos va existentes forzando una actualización global. 
Usando los servicios de interoperabilidad cualquier empresa puede ir desarro¬ 
llando sus nuevas aplicaciones en .NET integrándolas con las que va tiene 

Para terminar este punto, destacar que el desarrollo general de aplicacio¬ 
nes, sin importar su naturaleza, resulta mucho mas sencillo en la plataforma 
NT I de lo que era anteriormente utilizando el API de Windows, MI C o V isual 
Basic Esto es asi porque todos los servicios se exponen en forma de compo¬ 
nentes, dado que .NL I es una plataforma diseñada con una orientación a com¬ 
ponentes en mente Podemos olvidamos de los manejadores, los punteros v la 
gestión de bloques de memoria, centrándonos directamente en la funcionalidad 
de nuestra aplicación. 



Esquema de desarrollo y ejecución 

Vamos a comenzar trazando un esquema general del desarrollo y ejecución 
de las aplicaciones en la plataforma Microsoft .NET para, en los punios siguien¬ 
tes, ir profundizando en los detalles de algunos puntos mas concretos. 

Las herramientas de desarrollo para la plataforma ATT, en nuestro caso 
Visual Basic .Nh I . generan a partir de los diferentes módulos que conforman 
un provecto los respectivos módulos de código objeto. Éste se aloja, como es 
tradicional, en archivos con extensiones EXE v DLL aunque, en realidad, la es¬ 
tructura interna de dichos archiv os no es la clásica y el código que contienen 
no es directamente ejecutable, de ahí que no puedan usarse sobre Windows si 
no so tiene instalada la plataforma Microsoft A LT 

Cada uno de los módulos objeto contiene código independiente del tipo de 
procesador \ sistema operativo. Este código, llamado código en MSI 1 {Miero<oft 
intermedíate l.tM£¡m$c), no puede ejecutarse sin más. sino que tiene que ser pre¬ 
viamente compilado para el sistema y procesador concretos donde va a utili¬ 
zarse la aplicación. Al compilador que efectúa esa compilación ni vuelo, cuando 
es necesario, se le conoce como compilador JIT’ (/wsf iii time). 

En la plataforma .NET la unidad mínima que puede alojarse en memoria no 
es la librería de enlace dinámico ni el ejecutable, sino que es el a$$embl\f, termi¬ 
no que podemos traducir por montaje o eimamhlfuto. Un i/vsvmf’/i/ puede ser un 
solo archivo o bien estar compuesto de múltiples archivos con dependencias 
entre ellos 

Una misma aplicación puede constar de múltiples ensamblados, de igual 
forma que un programa Windows clásico puede componerse de varias libre¬ 
rías de enlace dinámico. Todos los ensamblados de una aplicación se ejecutan 
en el contexto do un mismo applit atino doníant o dominio de aplicación. I I con¬ 
cepto de dominio de aplicación es una evolución del concepto de proceso tal \ 
como se conoce actualmente en Windows, es un contexto en el que se compar¬ 
ten ciertos recursos: espacio de direccionamiento, modelo de hilos, etc. 

Para generar el código MS1L, los compiladores hacen uso del CTS {Connnon 
I i/pe Si/s fon), un sistema en el que se definen los tipos de datos v operaciones 
posibles recogiendo la sintaxis de muchos lenguajes. Si se desea que el código 
pueda cooperar con otros desarrollos, sin importar el lenguaje en que se escri¬ 
ban, entonces habrá que ajustarse a la CTS (Connnou Ijwguage Speeification), una 
especificación en la que se define un subconjunto del CTS que es común a todos 
los lenguajes. 

El código MS1L contenido en los ensamblados es alojado en memoria, a de¬ 
manda del usuario o de otras aplicaciones, por el CLR (Ow/wiw Ltiu^uu^e Rtm 
time). F.I CLR, o entorno común de ejecución, es una de las piedras angulares de 
la plataforma .NET. Se encarga no sólo de abrir los ensamblados, preparar el 
dominio de aplicación necesario v alojar el código en memoria, sino que, ade¬ 
mas, es el responsable de supervisar ese código encargándose, por ejemplo, de 
recolectar los objetos en desuso liberando la correspondiente memoria, un pro¬ 
cese) que se conoce habitualmente como C.C (C,arbole Cottci tion) o recolección 
ele basura. 



Para convertiré! código MSIL en código ejecutable, el CLK utiliza un compi¬ 
lador )IT- l'sfce optimizará el código para el sistema operativo y procesador en 
que va a ejecutarse, de tal manera que la aplicación siempre aprovechará de la 
mejor forma los recursos del entorno donde vaya a ejecutarse. Antes de compi¬ 
lar, sin embargo, el CLK verifica el código para comprobar que es seguro y pue¬ 
de ser apropiadamente supervisado en ejecución 

La figura V 1 resume esquemáticamente algunos de los pasos que se han men¬ 
cionado. I .stos se han separado en dos grandes bloques: desarrollo v ejecución 
Para el desarrollo dispondremos de Visual Basic .NET, utilizando sus diseña¬ 
dores y editores para generar el código fuente que, finalmente, compilaremos 
obteniendo los correspondientes ensamblados. Cuando estos sean requeridos, 
para ejecutar la aplicación, el código MSIL que contienen será verificado y com¬ 
pilado a código nativo, ejecutándose en la plataforma .NFT bajo supervisión 
del CLP. 


Desarrollo 
(Visual Basic .NET) 

Ejecución 
(Plataforma .NET) 

Editores y diseñadores 


^ veriTicacion 

i t _ 

i 

Código fuente 

Compilación 

(JIT) 
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Compilador 

Código nativo 


1 

Código MSIL 

Ejecución 

(Ensamblado) 

(CLR) 


Figura 3.1. Esquema genera! de trabajo de una aplicación NET 

Kesta decir que las aplicaciones .NF I harán uso de los servicios de la plata¬ 
forma Microsof t .NET, lo que se conoce también comoM/Vwe/7 .NI. I í nvncwork. 
Estos servicios proveen de todo lo necesario para aplicaciones clásicas, aplicacio¬ 
nes Web, servicios web, acceso a datos, etc. 


Composición de u na aplicación .NET 

Una aplicación .NF I consta de uno o más ensamblados, cada uno de los cua¬ 
les estará formado de uno o mas archivos conteniendo recursos v código MSN 
La aplicación, por tanto, puede ser tan sencilla como para estar compuesta de 
un simple archivo EXE o DLL, o tan compleja como para constar de múltiples 
archivos con código y otros elementos. 



Las aplicaciones .NET se ejecutan en el contexto de un dominio de aplicación, 
un ámbito virtual mediante el que se aísla a esa aplicación de otras que pudie¬ 
ran estar ejecutándose en el sistema. Un mismo proceso de Windows puede 
contener múltiples dominios de aplicación sin que, por ello, existan conflictos 
entre ellos. 

Ensamblados y manifiestos 

Si un ensamblado puede estar compuesto de múltiples módulos, cabe pregun¬ 
tarse cómo sabrá el sistema, a la hora de utilizar dicho ensamblado, qué módu¬ 
los son los que forman parte de él. La respuesta la encontramos en una porción 
de información, conocida como manifiesto, que relaciona a todos los elementos 
del ensamblado y, además, señala las dependencias existentes respecto a otros 
ensamblados, por ejemplo con servicios del sistema. 

Aunque es posible generar el manifiesto almacenándolo en un archivo inde¬ 
pendiente, lo habitual es que se incorpore a uno de los archivos que forman par¬ 
te del ensamblado. En los dos ejemplos desarrollados en capítulos previos, por 
ejemplo, el manifiesto se encuentra en el interior del ejecutable obtenido como 
único resultado. 


Nota 

Busque el archivoEXE resultante de los proyectos de los dos capítulos pre¬ 
vios en la subcarpeta \bin de la carpeta donde esté almacenado el ejem¬ 
plo. Uno era una aplicación consola y el otro una aplicación Windows sin 
ninguna funcionalidad. 


Podemos ver el contenido de cualquier ensamblado, concretamente el mani¬ 
fiesto que lo describe, usando la herramienta ildasm mencionada en el primer 
capitulo. La encontrará normalmente en la carpeta \Archivos de progra- 
ma\Microsof t. NET\FrameworkSDK\Bin de la unidad donde haya instala¬ 
do la plataforma Microsoft .NET. Invoque esa utilidad pasando como parámetro 
el camino y nombre del ejecutable AppWindowsForm.exe creada como ejem¬ 
plo en el segundo capitulo. Verá aparecer una ventana como la de la figura 3.2. 
En ella se enumeran los elementos que existen: un manifiesto v un ámbito con 
nombre que contiene una clase. 

1 latiendo doble clic sobre el elemento MANIFEST se abrirá una nueva ven¬ 
tana mostrando el manifiesto del ensamblado. Su contenido, como puede verse 
en la figura 3.3, seguramente no le dirá mucho. En las primeras líneas se hace 
referencia a varios ensamblados externos, concretamente los necesarios para 
usar formularios Windows y mscorlib, que contiene los servicios básicos del 
entorno común. Si abre este mismo proyecto en el entorno de Visual Studio 
.NET y abre el Explorador de soluciones, verá en la lista de archivos uno lla¬ 
mado As sembly Inf o. vb. Este módulo contiene la información del ensambla¬ 
do que se utiliza para crear el manifiesto. 
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Figura 3.2. Contenido de un ensamblado 



Figura 3.3. Contenido del manifiesto 













Ensamblados y dominios de aplicación 

Un ensamblado, como va se ha dicho, contiene el código y los recursos de una 
aplicación, ya sea en un solo archivo o en varios. Hasta cierto punto, podría¬ 
mos establecer una analogía con cualquier aplicación Windows tradicional, 
compuesta de un ejecutable principal y, opcionalmente, código adicional distri¬ 
buido en módulos DLL. 

Cuando una aplicación Windows tradicional se pone en marcha, el sistema 
crea un nuevo proceso y un primer hilo de ejecución para ejecutarla. El proceso 
define el ámbito de los recursos disponibles para la aplicación, por ejemplo el 
espacio de direcciones privado, evitando conflictos con otras aplicaciones que. 
a su ve/, contarían con otro proceso. 

Al iniciar una aplicación .NET el CLK, o entorno común de ejecución, crea 
un nuevo dominio de aplicación o AppDomain. Cada aplicación alojara en su 
AppDomain los ensamblados que necesite A diferencia de lo que ocurre con 
las aplicaciones tradicionales, el aislamiento de las aplicaciones no precisa el uso 
de un proceso independiente. De hecho, es posible que el entorno de ejecución 
utilice un mismo proceso para varios AppDomain. No por ello, sin embargo, ha¬ 
brá conflictos ya que cada AppDomain mantiene totalmente aislada a su apli¬ 
cación de las demas 

La figura 3.4 es una representación esquemática de lo que podrían ser dos 
aplicaciones .NET. Ambas se ejecutan en el mismo proceso, pero cada una en 
su propio dominio. I a primera aplicación, arriba a la izquierda, es nuestro ejem¬ 
plo AppWindowsForm que, como ya sabemos está compuesta de un solo en¬ 
samblado que, a su vez, consta de tan sólo un módulo ejecutable. I a segunda 
aplicación, hipotéticamente consta de dos ensamblados. El primero esta com¬ 
puesto de un ejecutable y algún módulo DLL. mientras que el segundo es una 
DLL adicional. 

Un mismo ensamblado puede, en la práctica, ser usado por distintas aplica 
dones, de tal lorma que se alojaría en el dominio de cada una de ellas. El entor¬ 
no de ejecución se encargará de compartir el código del ensamblado entre los 
dominios, asegurando que en cada uno de ellos el ensamblado aparezca como 
privado. 


Ámbito del proceso 


í AppWíndOWS (dominio) 



Figura 3.4. Representación de dos dominios de aplicación y sus ensamblados 





Ensamblados privados y compartidos 

I n el punto anterior so indica la posibilidad Jo que un mismo ensamblado 
sea usado por mas di» una aplicación. luí l«i práctica, oslo solo seria posible si 
oso ensamblado 1 lioso do tipo s/mivi/ o compartido. Poi delov lo. los ensamblados 
i]uo so generan ni lompil.n un provecto son pri\ ,idov ensamblados que solo 
serán usados por l.i aplicación que esta desarrollándose. 

A ditoivnda vio lo v|uo ocurro con los componentes y mma u ins olrevivios a 
trac ós vio C t )M, v uvos módulos dobon i ontai con tí i si ¡n tus onl radas on ol regis- 
tro para quo puedan sor oiu.mil iadas por Ins aplivaviones. I*» 1 » ensamblado^ pi i 
\ Ovios no precisan conl igurav ion alguno Basta con distribuirlos conjuntamente 
tovios los ensamblados do lo oplioooion. copiándolos en ol sistema vio destino 
puro quo luiuionon correctamente. I o instalación. por Ionio, os ton simple co 
nui arrastrar v soltar los archivos desde un soporto, por ojomplo un CD-ROM, 
.il disco do dosiino. I o desjnstalauon, eonsocuoiilemenlo, os igualmente sim¬ 
ple, bastando von eliminar los orv hivos No hav entrados huertanos on ol regis¬ 
tro vio Windows ni novio parecido. 

i iradas .1 oslo conipor'(amiento, no tendremos nunca mas problemas i on Lis 
versiones vio Lis DLL instaladas on ol sislom.i. Covio aplicación so distribuye 
con los ensamblados on la versión apropiada, sin enlrai en conlln lo con otras 
versiones vjuo puviioson ostar usando oirás aplicaciones. Adiós al i onocivio e»» 
mu DI I hi'll. 

Si lodos los ensamblados fuesen privados, no obslauto. nos encontraríamos 
on mía situación compleja al lonor que vlislribuir también, junio .1 nuoslro apli 
1 ai ion, todos los que contienen los servó ios del sislema v el Mu io<oft .\7 I 
irantt’zvork Paro evitarlo existen los ensamblados compartidos, eiisamblailos 
vjiit* pueden sor utilizados por múltiplos aplivaviones 

l os onsainblados compartidos no so distribuyen con las aplivac'iones, sino 
que so instalan on un lugar común del sistema para que todas ellas puedan en 
vonlrailos l'ste lugai común os conocido como C#Ac [Global \*>omblij Catín'), 
siendo v orno un deposito global vio ensamblados l a locali/av ion do oslo dopo- 
silo vlopondora del sistema operatóo donvio esto instalada la plataforma. I n 
Windows \P, por ejemplo. I.i carpeta W i ndows \assembly os la quo contieno' 
el C.AC (véase figura 3.5) 

Al disponer vio un depósito global para los ensamblados compartidos po¬ 
dría pensarse on los misinos problemas quo so tienen habituahuenle on Windows 
con las versiones do las DLL. Afortunadamente, ese problema, el di* Lis distin¬ 
tas versiones del mismo componente’, no existo en la plataforma NI I Para 
que un ensamblado pueda ser v ompartivio os obligatorio quo su nombre sea úni¬ 
co, luí para el cual se le asocia una clavo publica vio tipo RSA v también so dis¬ 
tingue entro versiones del mismo elemento. I 11 la figura 3.5 puedo ver que una 
ilo las columnas existentes es, precisamente, Versión Podríamos tenor ensam 
blados con el mismo nombro pero de distinta versión sin ningún problema, ca 
vía aplicación utilizaría la versión on la que esto interesada 

Disponemos do diversas herramientas mediante las cuales generar esas cla¬ 
ves publicas o instalar los ensamblados compartidos en el C’.AC . Desvio Visual 



Basic .NI I, como se aprecia en la figura 3.6, hasla con pulsar un bolón para ge¬ 
nerar la clave, introducirla en un archivo v añadir esto al provéelo actual. 
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Figura 3.5. Carpeta en la que esta el deposito de ensamblados compartidos 
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Figura 3.6. Generación de una nueva clave desde la ventana de opciones 
del proyecto 


Proceso de compilación y ejecución 


Ahora que va sabemos, básicamente, cual es la estructuro de una aplicación 
.NI I al nivel de módulos, ensamblados \ contextos de ejecución, vamos a en 








trar con algo más de detalle en el proceso do ejecución del código que contie¬ 
nen osos módulos. Nos interesara conocer, especialmente, los pasos de vei ¡li¬ 
tación, compilación y ejecución en el entorno común de manera supervisada. 

I as indicaciones dadas a continuación se aplican a lodos los lenguajes NI I 
va que todos ellos generan sólo código MSII. v no código nativo. I a excepción 
es Visual C++ .NI I que, como posiblemente va sabe, si es capa/ de generar có¬ 
digo nativo Windows. A ese tipo de código no se aplicarían las normas que van 
a describirse 

Código intermedio 

Actualmente la mayoría de las herramientas existentes para el desarrollo de 
aplicaciones generan código nativo, directamente ejecutable, para un determi¬ 
nado procesador y sistema operativo. Siempre se ha asumido que es la manera 
de obtener el mejor rendimiento, aunque esto dependería mucho del compilador 
utilizado Algunos compiladores no se actualizan a medida que surgen nue\ os 
procesadores, por lo que no aprovechan los nuevos conjuntos de instrucciones 
v posibilidades. 

Una aplicación nativa no puede utilizarse directamente en otros sistemas 
operativos, en ocasiones ni en distintas versiones del mismo sistema, v tampo¬ 
co so ejecutarían en otros procesadores. I s necesario, por lo tanto, actualizar \ 
reiompilar, contando con múltiples versiones de la misma aplicación una p.i 
ra cada combinación do procesador \ sistema operativo. 

Mediante los lenguajes que forman parte de Visual Sludio .NI i. v sus res¬ 
pectivos compiladores, lo que obtenemos es siempre código MSII o código in¬ 
termedio. Ivs un código independiente de sistemas operativos v procesadores 
por lo que, en principio, nunca tendremos que recompilar un proyecto a causa 
de un c ambio de procesador o de sistema l's posible generar código MSII con 
C# v Visual Basic NI I . pero también con multitud de lenguajes de* terceros la 
bricantes, desde Perl hasta COBOL v Portr.m, pasando por un ensamblador es¬ 
pecifico. 

I ogiiámente, el código MSII no puede ser ejecutado directamente. I'.sta ca¬ 
racterística puede ser vista como un inconveniente o bien como una ventaja, 
dependiendo de como se mire. I a misma aplicación NI I podría ejecutarse en 
Windows 2000. Windows CT o la próxima versión de Windows M hits, apro¬ 
vechando en todos los casos los recursos del procesador \ sistema sin, por ello, 
tener que compilar ni modificar nada. 

Puede ver el código MSII de* un modulo con la misma herramienta i ldasm 
ulih/ada previamente I s algo que ya hizo en el primer capitulo, obteniendo la 
definición del método Main( ) en ensamblador MSII 

El sistema común ¿le tipos 

Para general código MSII válido, que pueda ser ejecutado en el V’l K, los 
compiladores deben hacer uso de los tipos v operac iones definidos en el CTS 



(Cowtnon /' \/f>c Ni/s/rwf), un sistema común en el que se recogen todos los tipos 
de datos v todas las operaciones que es posible efectuar, recogiendo la tum io- 
nalidad de un gran abanico de lenguajes 

Podríamos decir que en el C | S se recogen las instrucciones básicas asi como 
los tipos de datos elementales que pueden utilizarse en el entorno común de 
ejecución 

No lodos los lenguajes NI I harán uso de todas Lis posibilidades del CTS. 
usando tan solo los elementos que requieran. No importa que el lenguaje de 
alio nivel utilizado sea BASIC , COBOI C# o Pascal, el código para, por ejem¬ 
plo, codificar un bucle será sintácticamente distinto en cada lenguaje, pero el 
código MSII. resultante sera idéntico. 

Partiendo de la base de que el código YtSII es indistinto del lenguaje de alto 
nivel usado para generarlo, es fácil comprender que un lenguaje puede utilizar 
código escrito en otro, por ejemplo en lorma de componente, sin ningún pro¬ 
blema. P.n realidad, esto será cierto siempre que ninguno de los lenguajes use 
elementos del CTS que el otro no comprende I lay que tener en cuenta que el 
CTS recoge características y operaciones que pueden no estar contempladas en 
todos los lenguajes de alto nivel. 

I.a sobrecarga de operadores en clases propias, por ejemplo, es una posibi¬ 
lidad contemplada en el CTS \ posible en C# o (,’++. pero no en Visual Basic 
ATT. 

P.xisle, no obstante, un mínimo común denominador, un subconjunto del 
CTS que si existe en todos los lenguajes .NLT F.se subconjunlo está recogido 
en la C I S (Connnon ^pcafii di ton), uno especificación que define las 

operaciones v tipos que deben utilizarse si se quien» oblener un código que 
pueda cooperar sin limitaciones con otros lenguajes. Los ensamblados que 
contienen código ajustado a la CIS pueden ser usados desde otros provectos 
aunque el lenguaje sea dislmto. Ls posible, por ejemplo, definir una clase en 
Visual Basic NI I v. posteriormente, derivar una nueva con C - I -to no seria 
posible m no respetase la Cl S. 

Qlie un determinado ensamblado se ajuste a la Cl S o no es un aspecto que 
se configura mediante un atribulo. I’ste, habilualmente, toma por detecto el 
valor True, que es lo que, por regla general, nos interesará. Podemos, no obs¬ 
tante. abrir el módulo Assemblylnfo y modificar dicho atributo tal como se 
muestra en la figura V7 De esta forma podríamos usar construcciones recogi¬ 
das en el t I S pero no en la especificación común para hacer posible la mterope- 
rahihdad en Iré lenguajes 


Nota 

Un proyecto puede utilizar internamente construcciones no ajustadas a la 
CLS pero no exponiéndolas al exterior, no haciéndolas públicas, obtenien¬ 
do como resultado una aplicación ajustada a la CLS. Dicho de otra manera: 
para que una aplicación esté ajustada a la CLS basta con que los tipos ex¬ 
puestos públicamente cumplan con dicha especificación. 



</> IppWlnttAwx - Mkimall VnutlBnk HIT (dfoehfti] ltwinblyln(« vti* 

X J 

¿ydv«> ^rcv*Kto Spr*ar Cwv» tfrfdjrtlM VegUA» Ayyde 

.¿3*U'^U0 t ife C *? * £3 • U > o*»* • j» • V 

a ^ - a. - -z 4 . 

* 

,1 1 . | .-.-H - I 1 n .| rHr .1, i ,:I « * * 

hvk**X* de sotaron^} • Appwi . 9 X 

i! ¡Vacío jJ |U\(0«Ur-cionM> J 

7! - j) * 

i 

* 

?\\ 

Syjrem. Pvt t*c» mu 

¡iiifori s ¡üyjtettt. Hunt l»e. IntetopScrvicea 

U t<<i pii-'i .im \ -m is * 

• set . t SMMfcUlOi Ou>«ge «r* * t_ Jt» VmlijtJ *• 

«tyitiu eirr* «ti sentó 1 v . 

J'evtec» • h* of tNi' »»;r<-nd l . AlMlblltr 

^ VteAn ApciWnW *'! J prvre' ■ 

3 ApoWnidocM 

• !¿| ftefecexec 

jfl Aseaaft*/Irtq,wb 

S| farro l *t> 

¡rf ' eyfée irt 

3 IMW.orí 

^ »WLM»Nii4l >id 

■cjufjeinb ¿y: AsscnfclyTltle ("") > 

ÍJfM*»... f O 55 


<**»** 0.1 y: AssemblyDascnpc ion ("") > 

Orcaededn « X Q 


< Js3»:nt>lY: HssBWti ly’tninpotiy (*”'i > 

v4«seHi,iyt AaaeniblyCo Al} 

cJ_rjeat.lv; AsowrOiyTr 5> True |> — 

CLSCcrapllaat IfJ 

[*lcw < l»t oinphanl Ac Ooolmn • 

■ Tlir íflinwiv'i rníV* (• ¿cir lia íf ot th» tvr«lih if • 
Ajjentílr: <Ju»d|"J7rC»Bíl'37í7-^AC»“e#tl-rBl»477AWt9J 

* ti B 

Si 


«J 

’ •'-r i' i irt£th ¡m «n h£MÉ)ly rotau'i nt tMH 

_i Já 


| lato : l*tl* Caítf c* n im | 


Figura 3.7. Modificamos el atributo CLSCompliant del ensamblado 


Ejecución supervisada 

El código MSIl., una vez compilado a codigo nativo mediante el compilador 
IIT. será ejecutado bajo la supervisión del CLR. En realidad, el código es veri¬ 
ficado antes de compilarse como parte del proceso de iniciación de la aplica¬ 
ción. En esa verificación el CLR comprueba que el código MSIL no almacena 
construcciones peligrosas que no puedan ser supervisadas, tales como el uso 
de punteros. 

Las diferentes tareas del CLR persiguen comprobar que el código puede ser 
ejecutado según los permisos establecidos, facilitar los servicios básicos de 
gestión de memoria o control de excepciones, facilitar la cooperación entre len¬ 
guajes o la ejecución distribuida o asegurar la ausencia de conflictos entre dife¬ 
rentes dominios de aplicación. 

Fl código que se ejecuta bajo supervisión del CLR se denomina maHagt'd cotdc 
o código gestionado. Esta supervisión hace posible, por ejemplo, que en los 
programas no tengamos que preocuparnos de la liberación de la memoria ocu¬ 
pada por los objetos, puesto que es el propio CLR, concretamente el recolector 
de basura, quien controla la vida de esos objetos y los destruye cuando no son 
necesarios. 

Gracias a la ejecución supervisada de las aplicaciones, el CLR garantiza una 
estabilidad superior a la existente tradicionalmente en las aplicaciones Windows. 
Una aplicación .NET difícilmente puede ejecutarse conteniendo un error que 
provoque un fallo incontrolado, y mucho menos que afecte a otros dominios 
de aplicación o el propio sistema. 





Compilación JIT 

Durante la fase de desarrollo utilizamos un compilador dependiente del 
lenguaje, un compilador que loma código fuente, escrito en Visual Basic, 
COBOI o cualquier otro lenguaje .Nbl, \ genera código MSN I se código, co¬ 
mo va sabe, no es directamente ejecutable Aquí es donde entran en escena los 
compiladores 11 I o ///s/ ui-liwc. conocidos asi por electuai una compilación <tl 
vuelo a medida que es necesario. I amblen se les conoce como ¡iller> 

Observe que hablamos de compiladores, en plural, va que existirán múlti¬ 
ples compiladores )11 según el sistema operativo v el procesador. De esta ma¬ 
nera, un mismo código MSN puede dar lugar .1 un código nali\n distinto para, 
por ejemplo, un Windows b4 bits sobre Itanium v un Windows (_T sobre Pocket 
IV fn unos casos, cuando el sistema es rápido \ con recursos, el compilador 
|l I ophmi/a el código lodo lo posible, aunque para ello se emplee mas memo 
ria v mas cielos del procesador ( liando el entorno es mas limitado, por e|em 
pío sobre dispositivos móviles, el ¡iller prácticamente se limita a traducir las 
sentencias MSIL a ordenes nativas, sin optimizaciones v consumiendo la me¬ 
nor cantidad de recursos posible. 

I ,os compiladores 11 I no son invocados explícitamente, sino que es el enIor¬ 
ín) de ejei lición el que los usa según es necesario. Por regla general no se com¬ 
pila todo el código de los ensamblados .1 medida que éstos se alojan en memoria, 
sino que van compilándose individualmente los métodos o medida que son in¬ 
vocados I sto reduce el tiempo de iniciación de la aplicación Por otra parte, 
cada método es compilado una sola vez. Al invocar por primera ve/ a un meto 
do se llama al ¡iller y a continuación se ejecuta l as veces siguientes es ejecuta¬ 
do directamente De esta torma se obtiene un buen balance entre velocidad de 
puesta en marcha v velocidad de ejecución. 

Cuando i*l código de un determinado ensamblado va a usarse siempre so¬ 
bre la misma versión de la plataforma NI. I \ el mismo sistema operativo v 
procesador, no ha\ necesidad de efectuar la compilación dinámicamente, du¬ 
rante la ejecución, siendo posible compilar a codigo nativo. Para ello existe lo 
que se ha venido a llamar un fue-jiltn, una herramienta que podemos utilizar 
desde la linea de comandos para compilar cualquier ensamblado. I sto es espe¬ 
cialmente apropiado, por ejemplo, en el caso de los propios serv n ios de la pla¬ 
taforma .NI I I slos se encuentran precompilados, por lo que no es necesario 
volver a compilar su código con cada aplicación. 

Información de tipos 

Aparte de código v recursos, los ensamblados también contienen inhuma¬ 
ción sobre los elementos o tipos con que cuentan. A esta información se le lla¬ 
ma habitualmente inefadtitn o meta-información. C'.racias a la información de 
tipos, el ( I l\ puede efectuar todo el trabajo que se ha descrito en un punte pre¬ 
vio. M compilador II I convierte el código MSN. en código nativo, pero deja la 
información de tipos en manos del C I R. 



Para establecer una analogía, v comprender mejor que es esla meta-infor¬ 
mación. pensemos un momento en el contenido de un servidor COM que aloja 
un control ActiveX. I n el interior de la librería no sólo se encuentra el código 
del control, también existe una librería de tipos que permite que ese control 
pueda ser manipulado visualmente, por ejemplo en el entorno de Visual Basic. 
Visual Basic no podría mostrar las propiedades de los controles si no existiese 
esa librería de tipos. I I caso de la información de tipos incluida en los ensam¬ 
blados es idéntico. 

l a información de tipos en los ensamblados no sólo hará posible la manipu¬ 
lación v isual de los componentes, sino que también será útil, por ejemplo, para 
trabajar con objetos medíanle enlace en ejecución. Usando determinados servi¬ 
cios de la plataforma incluso podemos recuperar esa información desdo apli¬ 
caciones propias. 

Servicios .NET para las aplicaciones 


Las aplicaciones NI I se escriben en un determinado lenguaje, que pode¬ 
mos elegir libremente, \ para realizar su trabajoso apoyara en los servicios que 
ofrece la propia plataforma NI I. Estos servicios se alojan en ensamblados 
precompilados, ensamblados compartidos que podemos encontrar en el depósi¬ 
to global del que hablábamos anteriormente. 

I n los capítulos siguientes conoceremos algunos de los servicios NI I, par¬ 
le de los cuales se han representado en la figura VS Por una parle tenemos los 
servicios que podríamos denominar comunes, accesibles independienlemenle 
del tipo de aplicación que estemos desarrollando. Con ellos podemos trabajar 
con bases de datos, manipular documentos o XMI o acceder a elementos re¬ 
motos. Sobre éstos se encuentran los servicios para la Web v para Windows. 


Servicios Microsoft.NET 


Web 


Windows 

VAtí. Servim) Wfci> tama i 

Wtnfamu |í_ 0D1-? | 




fe ASP.NET H 

wm32 't. 1 


Servicios comunes 

AD0.NET 1* XML 1 50AP I 

E/5 ! Seguridad i 

Figura 3.8. Esquema de parte de tos servicios de la plataforma Microsoft NET 

Desde nuestras aplicaciones, usaremos estos servicios creando objetos de 
clases definidas en determinados ámbitos o espacios con nombre. Al crear, en 




1*1 segundo capitulo, un formulario Windows, por ejemplo, estábamos usando 
una dase, llamada Form, definida en el ámbito SysLem. Windows. Forms 


Funtoe clave 


• 1 as necesidades de desarrollo actuales son muy distintas a las de hace 
unos años y, consecuentemente, las herramientas de desarrollo utilizadas 
hasta ahora comienzan a no ser suficientes. 

• I a plataforma Microsoft NET lacilita un entorno de ejecución común pa¬ 
ra múltiples lenguajes, un sistema de tipos también común y una bibliote¬ 
ca de i lases con servicios fundamentales. 

• I I ensamblado es la unidad básica de distribución v seguridad de una 
aplicación .NET. Un ensamblado consta de un manifiesto, código II v re¬ 
cursos. 

• Un ensamblado puede constar de un solo modulo o estar formado por 
varios. I I manifiesto, alojadoen uno de los módulos, establece la relación 
lógica entre ellos que da lugar al ensamblado 

• I a mavoria de los ensamblados son privados, pudiendo usarse tan solo 
internamente en el provecto del que forman parle. Existen ensamblados 
compartidos, como los que albergan los servicios de la plataforma NI I 
que se alojan en un lugar bien conocido. 

• Al iniciar una aplicación NET, los ensamblados que la componen se alo¬ 
jan en el contexto de un dominio de aplicación. 

• Al compilar un provecto Visual Basic .NL I el ensamblado obtenido no aló¬ 
la código ejecutable, sino código intermedio. Este, conocido como MSN , 
es independiente de procesadores y plataformas 

• El código II se compila a código nativo, por parte de un litlcr. justo en el 
momento en que es preciso ejecutarlo, también es posible precompilar a 
código nativo si se desea. 

• Las aplicaciones NET se ejecutan en un entorno común, conocido como 
Cl R, que consta de servidos básicos como los encargados de gestionar la 
memoria v recolectar basura. 

• I I CI.K reconoce un conjunto común de tipos llamado C’l'S El C I S, un 
subconjunto de CTS, asegura la ¡nteroperabilidad entre lenguajes. 

• Ademas de código, los ensamblados también alojan en su interior infor¬ 
mación de tipos. Esta resulta fundamental, por ejemplo, a la hora de ma¬ 
nipular los componentes en entornos visuales. 

• La plataforma .NLT consta de una serie de servicios, en forma de biblio¬ 
teca de clases de componentes, que facilitan el desarrollo de todo tipo de 
aplicaciones: Windows, Web, servicios, acceso a dalos, ele. 



Keeumen 


Al finalizar este capitulo va disponemos de una noción general sobre la es 
IriiLíura de las aplicaciones NI I, asi como del proceso que se sigue hasta llegar 
a su ejecución. Partiendo de nuestro provecto se generan uno o mas ensambla¬ 
dos, cada uno de los cuales aloja código MSll e información de tipos (. ada en¬ 
samblado puede componerse de múltiples «m hivos, utilizándose un maniliesto 
para definir tanto los elementos que forman parte del ensamblado como las de¬ 
pendencias que tiene respecto a otros. 

I os ensamblados se alojan en memoria, en el momento de la ejecui ion, tras 
ser wi ilu ados por el C'l R. liste es el encargado de crear el dominio o AppDoma in 
para la nueva aplicación, incluir en el los ensamblados y crear el primer hilo de 
ejecui ion. A medida que es necesario, el código MSll va compilándose a códi¬ 
go nativo, trabajo que efectúa el compilador 111 o filfa. I I C I R, aparte de ofre¬ 
cer servicios básicos, supervisa la ejecución encargándose de tareas como la 
recolección de basura o gestión de excepciones. 

Se han introducido muchos términos v conceptos que, a partir del capitulo 
siguiente, necesitaremos conocer para ir avanzando en el conocimiento del len¬ 
guaje Visual Basic .NI I v los servicios .NI I 







4 

Tipos de datos 


Un programa es una secuencia de sentencias u ordenes cuyo fin principal, 
generalmente, es manipular información. I sa información se almacena en va¬ 
riables, se introduce en el código en forma de constantes o es recuperada de di¬ 
versas fuentes. En cualquier caso es lundamental que conozcamos los tipos de 
ciatos que existen en Visual Basic .NI T, asi como la lorma de aprovecharlos en 
nuestros propios programas. 

I I objetivo de este capítulo no es sólo darle a conocer los tipos de datos dis¬ 
ponibles en el lenguaje, sino también mostrarle como declarar y usar variables, 
crear sus propias estructuras de datos o como trabajar con arreglos, caracteres 
v constantes. l os cambios respecto a Visual Basic o, si es que conocía esa ver¬ 
sión del lenguaje, son importantes. Sólo para abrir boca, sepa que en Visual Ba¬ 
sic .NI I no existe el tipo Variant v los nuevos tipos de datos su definen como 
eslrut turas. 

El detema común de tipos 

En el capitulo anterior su citaba la existencia de C TS, un sistema común de 
tipos compartido por todos los lenguajes disponibles para la plataforma Micro 
solt NI I Visual Basic .Nh I, como lenguaje ajustado a la especificación ( I S, 
usa parle de los tipos del L I S. Estos pueden clasificarse según el esquema de 
la figura 4.1. C'omo puede ver existen dos grandes ramas: los tipos que almace¬ 
nan valores y los que alojan referencias. Es una diferencia fundamental 







Tipos de datos 



► Intrínsecos 


► Enumeraciones 
- Estructuras 



► Autodescrlptivos 


► Clases 


* Arreglos 


. Interfaces 
* Punteros 


Figura 4.1. Clasificación de los tipos de datos NET 


Los tipos de dalos que almacenan directamente un valor ocupan un espacio 
de memoria en la pila, generalmente asignado de manera estática, de tal forma 
que su manipulación resulta muv eficiente. Por el contrario, los representados 
en la rama derecha son tipos de datos que podríamos denominar como comple¬ 
jos I I espacio de memoria necesario para almacenar la informar‘ion es asigna¬ 
do dinámicamente, tomándolo de un área conocido habitualmente como hnif>. 
Lo que se obtiene es una referencia al lugar en el que se encuentra el valor, no 
el valor en si Cada ve/ que quiere recuperarse al valor, o manipularse, es ne¬ 
cesario tomar la referencia v acceder al espacio de memoria previamente asig¬ 
nado. I I tiempo empleado, por tanto, es algo mayor. 

I n este capitulo v amos a centrarnos básicamente en los tipos de dalos de» la 
rama izquierda: intrínsecos, enumeraciones v estructuras. Posteriormente abor¬ 
daremos el tratamiento de los distintos tipos de c lases y las interfaces. Si trata¬ 
remos a continuación el uso de arreglos. 


Un sistema de tipos unificado 

l a mayoría de lenguajes actuales, excepción hecha de Smalltalk v pocos 
más, diferencian claramente entre objetos \ dalos que no son objetos. I n C‘++. 
por poner un ejemplo bien conocido, los tipos de datos intrínsecos, como cule¬ 
ros v caracteres, no pueden ser tratados como objetos de una clase. Podríamos, 
uo obstante, delmir clases que encapsulan esos tipos de datos, eso si, a costa de 
una bajada importante del rendimiento, que es lo que ocurre en Smalll.dk. 

Visual Basii API ciu*uta con un sistema de tipos umlicudo v combina lo 
mejor de ambos mundos, de los lenguajes en los que todo es un objeto v de aque¬ 
llos en los que existen tipos de dalos que no son objetos. Para conseguir este» 
todos los tipos de dalos de Visual Basó NI I parlen de una raíz común, llama¬ 
da Object tic la que derivan, por una parte, los tipos que almacenan directa¬ 
mente el valor y. por otra los que mantienen referencias 





En l<i figura 4.2 se ha representado esquemáticamente, y de manera simplifi¬ 
cada, este sistema de tipos unificado. La raíz, como acaba de decirse, esObject. 
Uno de sus tipos derivados es ValueType que, como puede ver, aclua como 
base de todos los tipos de datos intrínsecos, como Byte, Char o Integer. asi 
como de las enumeraciones y estructuras definidas por el usuario. 


Object 



Enum 


Figura 4.2. Sistema de tipos unificado de Visual Basic .NET 

La rama de la derecha representa cualquier clase, va sea existente en la pla¬ 
taforma .NET, cunto Array v Queue. o definida por el usuario. Todas ellas de¬ 
rivan también de Object. Contamos, por lo tanto, con un ascendiente común 
para lodos los tipos, independientemente de que almacenen un valor o una re¬ 
ferencia Esto tiene muchas ventajas puesto que, en la práctica, cualquier tipo 
puede ser tratado como si fuera un objeto, al estilo de Smalltalk Los tipos que 
almacenan valor, sin embargo, tienen un rendimiento muy eficiente, equipara¬ 
ble a los tipos intrínsecos de C++ v muchos otros lenguajes. 

Empaquetado y desempaquetado de datos 

El almacenamiento en memoria de un tipo de dalo por valor y otro por refe¬ 
rencia, representado en la figura 4.3, afecta al rendimiento v, lógicamente, de¬ 
termina en cierta manera la forma de utilizar el dato en sí. La variable entera 
que aparece en esa figura contiene directamente un valor, de tal forma que el 
acceso al dalo es directo y prima el rendimiento. La representada debajo, una 
variable que tiene como tipo una clase, almacena una referencia. El acceso al 
dato requiere un paso adicional, pero a través de esa referencia puede accederse 
no sólo al valor, sino a todos los miembros de que disponga de la clase: méto¬ 
dos, propiedades, etc. 

La existencia de una raíz común, según se ha visto en el punto previo, facili¬ 
ta la conversión de cualquier tipo de dato que almacena un valor en un objeto 
que lo contiene, y viceversa. Es lo que se conoce como /Hi.vu/y (empaquetado) y 
unboxin# (desempaquetado). El entero que aparece en la figura 4.3, por ejem¬ 
plo, puede ser empaquetado para tratarlo como un objeto en una colección de 
objetos heterogéneos, algo que no podríamos hacer si fuese un valor simple. 



Integef ViiHaMe » 50; 


50 


Pase Varubio = New GaseQ 

Referencia#-► 


Objeto 


Figura 4.3. Representación de dos variables, una conteniendo un valor 
y otra una referencia 


Dudo que tanto los tipos que almacenan valores como los que contienen re¬ 
ferencias son derivados de Object, la conversión de uno a otro, empaquetado 
o desempaquetado, se produce automáticamente, de manera implícita, aunque 
también podemos especificar de manera explícita el tipo deseado. I I código si¬ 
guiente muestra algunas situaciones en los que se empaqueta \ desempaqueta 
un valor entero. 


Dim Numero As Integer = 5 
Dijo RNumero As Object 
RNumero = Numero 

Consolé .WnteLine( RNumero) 

•• *¿ ^ n h ‘ •' •. 

RNumero » JO 

Numero - CInt|RNumero) 

Consolé.WriteLine(Numero) 
Consolé.WriteLine(RNumero) 


Consolé.WriteLine(10.GetType()) 


Nota 

Observe en este código, en la declaración de variables, que es posible 
asignar un valor inicial en el mismo momento de la declaración. Es una de 
las novedades de Visual Basic .NET que contribuye a simplificar el trabajo, 
al no ser necesaria una asignación separada tras cada declaración. 


Al ejecutar esta aplicación de consola obtenemos el resultado que puede ver¬ 
se en la figura 4.4. En principio RNumero toma el valor que tenia inicialmente 
Numero en el momento de proceder al empaquetamiento. Observe, ya al final 
del código, cómo podemos incluso usar una constante para invocar a métodos 





de Object, en osle caso con ero lo en el método GetType( ). En ese caso lam¬ 
inen se produce un empaquetado del valor para obtener un objeto, tras lo cual 
se llama a GetType( ). 
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Pi*e»s *ny k»y to continué.. 


Figura 4.4. Valores empaquetados y desempaquetados 

Recurriendo una ve/ más a la herramienta ildasm, que hemos usado en ca¬ 
pítulos previos, podemos acceder al código MSIl generado a partir del pro¬ 
grama anterior y ver, como en la íigura 4.ñ, el momento en que se realiza el 
empaquetado v desempaquetado do datos. F.n dicha figura, por ejemplo, se ha 
destacado la línea en la cual se empaqueta el valor 1 0, que aparece en la posi¬ 
ción anterior, justo antes de llamar al método GetType{ ). 

Tipos intrínsecos 

Conocemos con esta denominación a los tipos de dalos que podríamos con¬ 
siderar como tundamentales para el lenguaje: números enteros y con parte de¬ 
cimal de distintos tamaños, caracteres, cadenas, lógicos, etc. Si ha programado 
previamente con Visual Basic posiblemente conozca tipos como Integer, Long 
o Boolean, pero seguramente no sabrá que algunos de esos tipos, aunque con¬ 
servan el nombre, son distintos, asi como la existencia de otros nuevos: Char, 
Decimal v Object. 

l a tabla 4.1 resume los tipos de datos de Visual Basic .NET. En la platafor¬ 
ma .NET existen otros, parte del CTS pero no de la especificación CLS, que no 
existen romo tales en Visual Basic NI I pero si en otros lenguajes, tales como 
O o O-K 

Tabla 4.1. Tipos de datos intrínsecos de Visual Basic NET 


Tipo 

Dato que puede contener 

Byt e 

Shor t 

Integer 

Numero entero de 8 bits sin signo 

Número entero de 16 bits sin signo 

Número entero de 32 bits sin signo 








Tipo 

Dato que puede contener 

Long 

Numero entero de 64 bits sin signo 

Single 

Numero con paite decimal de precisión simple 

Doub le 

Numero con parte decimal de precisión doble 

Décima 1 

Número con parte decimal lija para cálculos financieros 

Boolean 

True0 FaIse 

Char 

Un carácter del conjunto Unicode 

string 

Cadena de caracteres 

Object 

Referencia a cualquier objeto 



Figura 4.5. En el codigo MSIL es lacil encontrar el punto en el que se 
empaquetan los datos 


Observe que v«t no existen tipos como Currency o Variant v que el tama 
no de los tipos enteros ha cambiado. Ahora Integer es un numero de 42 bits, 
no de 16 como en Visual Basic o, y Long es un entero de M bits, tipo inexistente 
en versiones previas del lenguaje. 

Cada uno de los tipos de Visual Baste tiene una correspondencia con un tipo 
del C IS de la plataforma .NET En realidad, los tipos de la labia 4.1 es el mim¬ 
bre que so les ha dado en Visual Basic NiE’I a algunos de los tipos del OS. En 
la tabla 4.2 puede ver la correspondencia entro tipos de Visual Basic NE 1 v su 




denominación en el ámbito System de l.i platulorma NI I. AJ final de la labia 
aparecen los tipos que no tienen un equivalente en Visual Basic NI I 


Tabla 4.2. Equivalencia de tipos entre Visual Basic NET y el CTS 


Tipo CTS 

Tipo Visual Basic .NET 

System.Byte 

By te 

Sys Lem.In t16 

S h o r t 

System.Int32 

Iuteger 

System.Int 64 

Long 

Sys Lem.Single 

S i ng l e 

System.Double 

Double 

System.Decimal 

Decima 1 

System.Boo1ean 

Boo lean 

System. Ctiar 

Cha r 

System.String 

String 

System.Object 

Ob j ec t 

System.SByte 

No existe 

System.UInt16 

No existe 

S y s t. em. UI n 13 2 

No existe 

System.Ulnt64 

No existe 

.System. InlPLr 

No existe 

System.UTntPt r 

No existe 


Tipos no ajustados a la CL5 

I os tipos de datos que aparecen al final de la tabla 4.2 formau parte del sis¬ 
tema común de tipos de la plataforma NI I, por lo que cualquiera que desa¬ 
rrolle un nuevo lenguaje puede, opcionalmente, nnplcmentar su uso. No son 
tipos de datos, sin embargo, que aparezcan en la especificación C I S. I'slo sig¬ 
nifica que su presencia en un lenguaje no es indispensable, por eso en Visual 
Basic .NET, concretamente, no existen como tipos nativos. 

Que esos tipos no aparezcan como nativos en el lenguaje no signilu a que no 
puedan ser usados Al ser parte de la plataforma .NET. es posible declarar va 
riables de esos como si fuesen estructuras creadas por nosotros mismos. En el 
siguiente programa, por ejemplo, se muestra cómo utilizar el tipo IntPtr para 
trabajar con un puntero Se usan los servicios de interoperabilidad de la plata 
forma .NI I para asignar un bloque di* memoria, escribir un dato en el, poste¬ 
riormente recuperarlo v, Iin.límenle, liberar esa memoria. 




Importa Sys i.em. Runt ime . 1 nteropServ ices 
Module Modulel 

Sub Main() 

i|.< t *»*. !/ « . * .|t> ■ *•' 

Dim Puntero As Syst.em. IntPtr 

Puntero a Marshal.AllocHGlobal(255) 


Marshal.WriteByte(Puntero, 16) 


Consolé . Wr i tel.ine ( " {0 ) c {1} M , Puntero . ToStri ng () , 
Marshal.ReadByte(Puntero)) 


Marshal . f’reeHGloba 1 ( Puntero ) 

End Sub 

End Module 


Nota 

La sintaxis {0} y {1} en el primer parámetro del método WriteLinef ) 
se utiliza para introducir los valores de los parámetros que se facilitan en 
segundo y tercer lugar. 


I .1 ejecución del programa genera la salido de una cadena de caracteres 
(véase la figura 4 0 ) en la que se muestro la dirección del bloque de memoria 
asignado, recuperada directamente a partir de la variable IntPtr medíanle el 
método ToString< ). y el valor recuperado do esa dirección. 
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Fruta «ny key to continua. 


Figura 4.6. Dirección del bloque de memoria y valor que contiene 








De mjnoni análoga podríamos usar los domas tipos do datos que. .íunquo 
no son nativos do Visual Basii .NI I, si forman parte do la plalaforma NI I 


Declaración de variables 

l os tipos do datos no son útiles por si mismos, aisladamente Su finalidad 
es laeililarla manipulación do información, por ejemplo estableciendo la estruc¬ 
tura de una variable en memoria v el formato de los datos que puede contener 
I as variables podemos declararlas en distintos ámbitos: interior de una función, 
interior de una clase, con ámbito de modulo, etc Además, existen una serie de 
palabras clave que nos permiten indicar la visibilidad de la variable fuera de ese 
ámbito. 

Además del ámbilo, en la declaración también se establece el tipo de las va¬ 
riables que, como va sabe, determina los valores que podrán contener. Opcio¬ 
nal monte, es posible dar un valor inicial en el mismo momento de l.i dei lal ación. 
De no especificarse lo contrario, las nuevas variables tendrán asignado un va¬ 
lor por defei to. 

/ 

Ambitos y visibilidad 

Utilizando la palabra clav e Dim para efectuar la doc laracion. que es ln más 
habitual en versiones previas de Visual Basic, la variable tendrá el ámbito por 
defecto. I ste determina que una variable declarada en el interior de una fun¬ 
ción, por ejemplo, solo sea visible en su interior \, además, su \ ida se limite al 
tiempo durante el que esa luncion esta ejecutándose. I s lo que se conoce habí 
tli al mente como variable local. 

Un ámbito aun mas reducido lionen aquellas v ariables declaradas en un blo 
que vio código, como puede ser un bucle o un condii ional. Tan solo puede avce¬ 
derse a ellas desde instrucciones existentes en ese bloque, bu contraposición, 
una variable declarada fuera de cualquier función, al nivel de modulo o clase 
sera compartida por lodo el código de esa entidad. Si ademas usamos el modi¬ 
ficador Public, la variable será enlomes visible en todo el nnnicsfUJcr, el ambi- 
lo ton nombre en el que se introducen los módulos v clases que formaran la 
apliiac ion. 

l.s más lacil comprender eslo mediante algo de codigo Iniciamos una nue¬ 
va aplicación de consola e introducimos el código siguiente: 

Module Modulel 

Public Enterol As Integer 5 

Private Entero^ As Integer - 10 

Sub Main() 


Dim EnteroJ As Integer - 15 



Auxiliare ) 


Din» MiSimple As New Simplef) 
M i-Simp 1 e. Enumera ( ) 


Console.WriteLine(“Main( )") 

Consolé.WriteLlne( M <0>, {1} y i 2 } ” , Entero), Entero2, Entero3) 

End Sub 


Sub Aux i 1 iar ( ) 

Consolé . Wri.teLi.nef "Auxiliar" ) 


Consolé.WriteLine( M <0) , <11 y {2}”, Enterol, RnLero2, Entero3) 

End Sub 
End Module 


Class Simple 

Private Entero4 As Integer * 20 
Sub Enumera() 

Consolé.WriteLine("Simple.Enumera()”) 


Consolé.WriteLine ("{ 0}, (1) y { 2 } " , Enterol, Entero4 , Entero2) 

End Sub 

End Class 

Como puede ver, leñemos cuatro variables enteras llamadas Enterol, En¬ 
te ro2, Entero3 v Entero4, cada una de ellas con un ámbito distinto. I a pri¬ 
mera está declarada en el interior de Module 1 pero usando el modificador 
Public, lo que da como resultado que la variable sea visible en todo el ámbito 
con nombre, o tnwt^fuu r\ establecido como principal en la ventana de opciones 
del provecto. La segunda, a pesar de declararse en el mismo punió, solo es vi¬ 
sible en Module 1 ya que se ha usado el modificador Private. 

Entero3 es una variable local al método Main ( ), de ahí que no sea accesi¬ 
ble desde ningún punió externo, ni desde la función Auxi liar ( ), que esta en 
el mismo módulo, ni desde una clase externa al módulo pero dentro del mismo 
ntiincspacc. Por último tenemos Entero4, una variable con visibilidad limitada 
a la t lase Simple. F.sto significa que cualquier método de esa dase puede ai ce¬ 
der a la variable, pero ningún código externo tiene esa posibilidad. 

I I código, tal v como está mostrado más arriba, genera errores de compila 
cion que, gracias a la compilación en segundo plano de Visual Basii .NI T, son 
resaltados en el editor sin necesidad siquiera de llegar a compilar. Para obte¬ 
ner un ejecutable válido sustituya los parámetros no accesibles por e! valor 0. 
I ntoiues si podrá ejecutar, obteniendo un resultado similar al de la figura 4.7. 
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Figura 4.7. Valores de las variables en distintos puntos 


Nota 

No se preocupe en este momento por la sintaxis utilizada para definir una 
clase, crear un objeto a partir de ella y usar sus métodos. Es un aspecto del 
que nos ocuparemos en profundidad en un capítulo posterior. 


Vida de una variable 

Al trabajar con variables hay que distinguir entre lo que es la visibilidad, 
los puntos desde los que puede accodorse a ella, y la vida de la variable, que es 
el tiempo transcurrido desde el momento en que empieza a existir hasta que se 
destruye. Un el programa anterior, por ejemplo, la variable Entero3 comienza 
a existir cuando se inicia la ejecución del método Main( ), destruyéndose cuan¬ 
do éste finaliza. 

l o mismo ocurriría, por ejemplo, si hubiésemos declarado una variable en 
el método Auxiliar ( ). I I tiempo de vida, por tanto, esta limitado al espacio 
de tiempo durante el que se ejecuta el método en cuestión. 

Distinto es el caso de la variable Entero4, declarada como miembro de una 
clase. Cada vez que se crea un objeto de esta clase se inicia la vida de la va¬ 
riable, permaneciendo accesible para todos los métodos de la clase hasta que el 
objeto sea destruido. 

Por ultimo tenemos las variables Enterol y Entero2. Ambas existen du¬ 
rante toda la ejecución del programa, desde que esle se inicia hasta que finali¬ 
za, si bien su visibilidad es distinta como se ha visto en el ejemplo previo. 

Mediante ciertos modificadores es posible alterar el tiempo de \ ida de una 
variable sin, por ello, alterar su visibilidad. Por ejemplo, en el caso de la varia¬ 
ble Entero3, local al método Main( ), bastaría con cambiar Dim por Slatic 
para tener una variable que existe desde que se inicia el programa hasta que 
termina, es decir, con un tiempo do vida idéntico al de Entero L v Entero2. 

I ,a visibilidad, sin embargo, seguiría siendo la misma. Una variable estática, 
nombre con el que se conoce a las declaradas usando la palabra Static, liene 





utilidad en caso de que deseemos mantener su valor mas alia del tiempo de \ i- 
da del bloque en que se encuentra. 

Seguramente comprenderá el concepto de variable estática. \ su funciona¬ 
miento, mucho mejor con un ejemplo. Nuevamente partimos de una aplicación 
de consola. En este caso además del método Main{ ) contaremos con otro, lia 
mado MuestraVar iables ( ). en cuyo interior dec íararemo^ dos variables 
locales del mismo tipo. Estas dos variables no serán visibles Inora de du lio me 
todo pero, como puede ver en el código siguiente, su tiempo de \ ida sera dis¬ 
tinto. l a primera se ha declarado con la palabra clave Dim, dando lugar a una 
\ariabl t % atilonnificii. Asi se conoce a las variables que son creadas cada \e/ que 
se entra en su ámbito y destruidas al salir de él. La segunda, por el contrario, es 
estalu .», de tal forma que existe durante toda la ejecución del programa. 


Sub Main f ) 

Dim Contador As Byte 

fol- Contador - l To Irt 
MiiestraVar iablesf J 

Next 
End Sub 


Sub Muest raVai ¡ able.s ( ) 

Dim Val orí As Byte 
Static Valoré As Byte 

Va i ot l • - I 
Valoré 1 


Conso J f. Wr i Leí. i nc* ( "Va 1 ui 1 ( ü ) , Valor Vaiorl, Valor 

End Sub 


Al ejecutar el programa obtendrá un resultado como el de la figura I s en el 
que se ve claramente que en cada ILimada al método MuestraVari ables( ) 
la \ ariable Vaiorl tiene de partida el valor 0. mienl ras que Valor 2 conserva 
el contenido de la invocai íón anterior v. por ello, su valor va im remenlándose 
en cada llamada 


Nota 

Las variables declaradas en el interior de una clase pueden tener un tiempo 
de vida asociado a los objetos creados a partir de ella, según se ha descrito 
anteriormente, o una vida global asociada a la propia clase Para ello se uti¬ 
liza el modificador sha red. Es un tema del que nos ocuparemos en un ca¬ 
pitulo posterior. 
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Figura 4.8. Valores obtenidos por las variables locales 


Especificación de tipo 

Además del ámbito, el tiempo de vida v el idenliíkador de la propia varia¬ 
ble, una declaración debe completarse especificando su tipo. Va lo ha visto en 
los ejemplos previos, en los que hemos utilizado variables de tipo Integer y 
Byte, Básicamente, basta con disponer detras del identificádor de la variable 
la palabra As y el nombre del tipo que deseamos In el caso de que múltiples 
variables vayan a compartir el mismo tipo, no es necesario indicarlo tras cada 
identilicador. siendo suficiente la separación de idenliIu adores mediante co¬ 
mas y | t i indicación del tipo al final, como se muestra cu el siguiente ejemplo: 

Dim Vari, Var2, Var3 As Integer, Var4, Var5 As Byte 

hn este caso Var 1, Var2 y Var3 son de tipo I nteger, mientras que Var4 v 
Var5 son de tipo Byte l'sto es un cambio importante respecto a lo que ocurría 
en versiones Previas de Visual Basic en las míe. al no haberse indicado un tino 
justo detrás. Vari. Var2 v Var4 serían de tipo Variant. 

Asignación de un valor inicial 

Otra posibilidad nueva, inexistente en versiones previas de Visual Basic, es 
la a sien avión dc‘ un valor inicial a las variables en el mismo momento de la de¬ 
claración. ahorrando asi una asignación posterior. I ; s algo que ha podido ver 
también en alguno de los ejemplos usados en este capitulo. Basta con poner el 
símbolo = al final, seguido del valor inicial que, lógicamente, deberá estar en 
consonancia con el tipo que se ha indicado 

I n caso de que oslemos dri'tarando mas de una variable del mismo tipo, los 
valores de cada una de ellas irían detrás del identilicador a excepción del co¬ 
rrespondiente a la última, que iría detrás del lipo. I n la linea siguiente tiene un 
ejemplo do este caso concreto 


Dim Va i 1 «■ *» , va i 2 


10, Vari As Integer 1 5 



Además do valores constantes, en la asignación del valor inicial también po¬ 
demos usar otras variables e, incluso, expresiones que den como resultado un 
valor del tipo que espera la variable. 

Tipos definidos por el usuario 

Además de los tipos de datos que podríamos denominar intrínsecos, pre¬ 
definidos en el lenguaje. Visual Basic NET nos permite utilizar cualesquiera 
otros que hayamos podido definir. Siempre emendónos a los tipos que almace¬ 
nan valores, no referencias, es posible crear básicamente dos tipos de datos: 
enumeraciones v estructuras. En un capítulo posterior veremos que también es 
posible definir tipos de referencia, concretamente clases de objetos. 

Tanto las enumeraciones como las estructuras son entidades derivadas de 
System. ValueType. Una enumeración puedo definirse prácticamente en cual¬ 
quier lugar, como las declaraciones de variables, mientras que las estructuras 
solo pueden aparecer en módulos y clases, siendo tipos mas complejos que las 
enumeraciones. 

Lógicamente, en Visual Basic .NET existen enumeraciones y estructuras pre¬ 
definidas, muchas de las cuales conocerá al estudiar servicios como C.D1+, en 
capítulos posteriores. Aparte, nosotros podemos también definir nuestros pro¬ 
pios tipos 


Enumeraciones 

La mayoría de los tipos de datos intrínsecos permiten que una variable to¬ 
me un valor de una lista más o menos limitada. Una variable de tipo By te, por 
ejemplo, puede contener un número entre 0 y 255, un Boolean sólo puede te¬ 
ner los valores True o False, y lo mismo ocurre con los tipos enteros y el tipo 
Char. 

Siempre que necesitemos una variable que deba tomar un valor de una lista 
limitada, no existente en ninguno de los tipos intrínsecos ni enumeraciones 
predefinidos, podemos crear nuestra propia enumeración. Suponiendo que en 
una aplicación médica necesitemos variables que contenga valores represen¬ 
tando músculos, huesos y otros elementos, podríamos definir las enumeracio¬ 
nes apropiadas. Una de ellas podría ser la siguiente: 

Enum Dedo 
Pulgar 
Indice 
Corazón 
Anular 
Meñique 
End Enum 

El identiticador Dedo es, a partir de esta definición, un nuevo tipo ríe dalo. 
Podemos utilizarlo como cualquier otro, Integer, String, Byte, etc., para 



declarar variables. Las variables de tipo Dato tan sólo podrán contener uno de 
los valores que aparecen en la enumeración. I I editor de Visual Basii .NLT. al 
efectuar una asignación de una variable de este tipo, se ocupa de mostrar (véa¬ 
se la ligura 4.9) la lista de posibles valores. 



Figura 4.9. El editor reconoce el tipo de la variable y muestra los valores 
que podemos asignarle 


Internamente las variables de tipo Dedo almacenan un valor entero que re¬ 
presenta a la constante que corresponda. En el caso de la enumeración Dedo, la 
constante Pulgar tiene asociado el valor 0, índice el 1 y asi sucesivamente. 
Puede comprobarlo Fácilmente haciendo algo así; 

DedoAÍectado * Dedo.Corazón 
Consolé. Wr iteLine(DedoAfectado) 

Si lo que quiere obtener no es el valor equivalente a Dedo. Corazón, en este 
caso, sino el nombre de la constante, puede usar el método ToString( ) con el 
que cuentan la mayoría de los tipos do datos. Utilizando DedoAfectado.To- 
String( ), por lanío, no obtendríamos el valor 2 sino la cadena Corazón. 

Comprobación estricta de tipos 

Sí, partiendo de la enumeración definida en el punto anterior, declara una 
variable de tipo Dedo y después le asigna un valor numérico, comprendido «Mi¬ 
tre l) v 4, verá que Visual Basic .NLT no genera ningún error I o que ocurre es 

















que so efectúa un.i conversión implícita, sin necesidad di’ que la indiquemos, 
conv ¡i tiendo el entero en la constante que corresponda 

I sias conversiones implícitas no solo .se dan en este caso, sino en algunos 
mas v en ocasiones, pueden inducir a errores cuando se obtiene un resultado 
que no era el que se esperaba. Para evitarlo, lo mejor es activar Ja comproba¬ 
ción estili ta de tipos de Visual Basic .NI I. Para ello basta con introducir la 
senlenvia Opt ion Striot Onal inicio de cada modulo de codito. Al hacerlo, 
una asignación como Dedo = 2 generaría un error de compilación. 

Por dctcc lo Visual Basic NI I esta c onfigurado con Opt ion Strict en es¬ 
tado Off, de ahí que hava cine introducir la sentencia anterior para modiíicYn 
el estado v activar la comprobación estric ta de tipos. 

I amblen puede' optar por acceder a las opciones «.leí procedo, como se ha 
hecho en la figura 4 10, \ modificar ese estado por defecto. De esta manera no 
tendrá que introducir manualmente Option Strict On encada modulo i.s 
lo mas recomendable 



Figura 4.10. Alteramos el estado por detecto de option Mti ict 


I a comprobación estríela de tipos aléela, como se ha dicho, no solo a las 
enumera», iones Al ai t i \ arla tampoco podremos asignar di reí lamento con con 
\ ersion implícita un numero decimal a una v ariahle en lera, poi oonei un c aso. 
Ivs la situación que puede ver en la figura 4 II), en la que \ fsual Bastí NI I nos 
informa sobre el error de la asignación direc ta. I n estos casos tendremos que 
indiuit de manera explícita, que deseamos efectuar la conversión Para ello 
utilizaremos lun» iones »orno Clnt ( ). CDbl ( ), CLng ( ), etc . según ciesc*emos 
convertir a Inteqer. Double. Long. etc I n el caso de !a figura -l.l I tendría 
mus une utilizar Clnt í P i ) 

I-visten luni iones de conversión para lodos los tipos intrínsecos, asi como 
una función genérica que nos permite tonverlir cualquier valor de un tipo a 
otro I -4a luncion, llamada CTypef ) necesita dos parámetros el valor a con 




vertir, en primer lugar. v el tipo <il que se desea convenir. Utilizando esta hm- 
cion la siguiente asignación seria completamente valida 

DedoAfectado - CType(2, Dedo) 

Consolé. Wr i tel.i ne ( DedoAfectado.ToSt r i ng ( ) ) 

I a constante numérica entera 2 es convenida al tipo Dedo, obteniéndose en 
la variable DedoAfectado el valor Corazón. 
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Figura 4.11. La asignación con conversión implícita ya no es posible 


Nota 


Debe tener en cuenta que ciertas conversiones implican la pérdida de parte 
de la información original. Es lo que ocurre, por ejemplo, cuando se asigna 
un número con parte decimal a una variable entera. 


Estructuran 

Las enumeraciones son tipos simples, ol estilo de los en ten» v caracteres. 
Una estructura, por el contrario, es un tipo complejo compuesto de uno o mas 
miembros, cada uno de ellos podiendo ser de cualquier tipo. Lina estructura 
puede contar incluso con constructores v métodos, como las clases, sin. por 
ello, dejar de ser un tipo que mantiene un valor, no una re le* renda. Una estriu tu 
ra es el tipo adecuado cuando la complejidad de la inlormacion no es excesiva 










v. por lo tanto, no justifica el diseño de una clase específica para gestionarla, 
creando objetos a partir de ella, Es el caso, por ejemplo, de estructuras como 
Point, Size o Color, definidas para mantener la información de un punto, 
unas dimensiones o un color. A pesar de las similitudes, hay que tener en cuen¬ 
ta que una estructura y una clase son entidades muy distintas. Las estructuras 
siempre están derivadas de System. ValueType, mientras que las clases pue¬ 
den derivarse unas de otras. Las estructuras, por lo tanto, no cuentan con he¬ 
rencia. Las estructuras son en Visual Basic .NET el sustitutivo de los tipos de 
usuario de Visual Basic o v versiones previas. Básicamente, hay que sustituir 
las palabras Type v End Type por Structure y End Structure. 

Ll fragmento de código siguiente, por ejemplo, define una estructura que 
cuenta con cuatro miembros: tres cadenas de caracteres y un valor numérico 
de tipo Single. Al igual que ocurre con las enumeraciones, partiendo de esta 
definición ya podemos crear variables de tipo Libro. 

Structure Libro 

Public Titulo As String 
Public ISBN As String 
Public Autor As String 
Public Precio As Single 
End Structure 

Tara acceder a los miembros con que contaría una variable de este tipo es 
necesario utilizar el operador . disponiéndolo entre el nombre do la variable v 
el del propio miembro. De esta forma, podríamos establecer u obtener los valo¬ 
res de la si guien le manera: 

Dim UnLibro As Libro 

UnLibro.Titulo = "Guia practica visual Basic .NET" 

UnLibro.Autor * "Francisco Charte Ojeda" 

UnLibro.ISBN » "84-415-1290-6" 

UnLibro.Precio = 10.75 

Tara simplificar este código, en el que se hace referencia múltiples veces al 
identificador UnLibro, es posible utilizar la sentencia With. Con ella, v en el 
ámbito de un bloque delimitado por la propia palabra With v la terminación 
End With. es posible acceder a los miembros do la estructura utilizando tan 
sólo e! operador . como se hace en el código mostrado a continuación. 

With UnLibro 

.Titulo - "Guia practica Visual Basic .NET" 

.Autor ■- “Francisco Charte Ojeda" 

.ISBN - "84-4 15-1290-6 " 

.Precio * 10.75 

End With 

Asignad! táldad. 

La variable UnLibro almacena directamente los valores asignados a los 
miembros de la estructura, siendo posible la asignación directa entre variables 



del mismo tipo, como ocurro con el rosto do los tipos que hornos conocido has¬ 
ta ahora. No os posible, por el contrario, conversión alguna con variables do 
otros tipos, caso on ol cual tendríamos que acceder do manera individual a los 
miembros que nos interesen para recuperar o asignar el valor. 

En el código siguiente ve un caso hipotético on ol que quiero asignarse el 
contenido do una variable Libro a otra del mismo tipo, algo totalmente correc¬ 
to, tras lo cual deseamos asignar el valor de una cadena a la primera variable 
Esto no es válido ni siquiera usando la función CType( ) Como puede supo¬ 
ner, habría que escribir UnLibro. Titulo = Titulo. 

Dim UnLibro, OLroLibro As Libro 

Dim Titulo As string - "Programación con visual Studío .NET" 

With UnLibro 

.Titulo «- “Guia practica Visual Basic .NET" 

.Autor "Francisco Charte Ojeda" 

.ISBN - "B4-415-1290-6" 

.Precio = 10.75 

End With 

OtroLibro = UnLibro 

’ UnLibro * CType(Titulo, Libro) 

l a comprobación de igualdad entre estructuras es otra operación que no 
podemos realizar como es habitual, utilizando el operador =. En el fragmento 
de código anterior, por ejemplo, no podríamos codificar un condicional asi. 

If UnLibro * OtroLibro Then 

Todas las estructuras Cuentan con un método, llamado Equals( ), que faci¬ 
lita la comprobación entre estructuras del mismo tipo. Una sentencia como la 
siguiente mostraría por la consola True oFalse, dependiendo de que UnL i bro 
v OtroLibro sean iguales o no. 

Consolé . Wr i t.el. ine ( OtroL i bro . Equals ( UnLi bro ) . ToSt r inq l ) ) 

Miembros públicos y pri vado*? 

Una di lerenda de las estructuras de Visual Basic .NET, respecto a los tipos 
de usuario de versiones previas del lenguaje, es que los miembros no sólo 
cuentan con un ¡denliíicador v un tipo sino que, además, deben precederse de 
un modificador que indique su visibilidad 

En la estructura Libro definida antes todos ios miembros son Public, de 
tal manera que puede acceder se a ellos desde cualquier punto donde se haya 
definido una variable Libro. 

En lugar de Public podríamos haber usado la palabra Dim, obteniendo el 
mismo resultado. I as otras alternativas son Pri vate y Friend. Con el prime¬ 
ro los miembros serian privados, de tal manera que no podrían manipularse 
desde fuera de la propia estructura. Con el segundo tendríamos una combina¬ 
ción de Public y Private, puesto que los miembros de Ja estructura serían 



públicos para el codito del mismo ensamblado en el que se ha del inido la es¬ 
tructura, permaneciendo como privados para oíros ensamblados. 

Posiblemente se pregunte que sentido tendría declarar los miembros de una 
estructura como privados, de tal manera que no puedan manipularse dios la¬ 
mente desde el exterior. La respuesta se encuentra en el punto siguiente. 

Métodos, constructores y propiedades 

A diferencia de los tipos de usuario de Visual Basic t>, las estructuráis de Vi¬ 
sual Basic NIT no sólo pueden contener miembros de datos sino que. ademas, 
pueden también contar con funciones v procedimientos actuando como meto 
dos, que operan sobre los dalos; constructores, que facilitan la iniciali/acion, v 
propiedades, mediante los cuales controlar el acceso a esos datos. 

I n el capitulo dedicado a la programación orientada a objetos nos ocupare¬ 
mos con mayor detalle, al estudiar Lis clases, de los constructores, la detinii ion 
de propiedades \ métodos. Por ahora nos eontormaivmos con ver como añadir 
un método v un constructor a la estructura Libro, de|andnla como se muestra 
a continuación 


Structure Libro 

Public Sub New(ByVal T As Sti*ing, ByVal I As String , 

ByVal A As String, ByVal P As Single} 

Titulo * T 
ISBN - I 
Autor ~ A 
Precio P 

End Sub 

Public Sub Muestra! | 

Consolé .Wr itcLLne(" fOJ, {!}, {2>, {1} " , 

Titulo, ISBN, Autor, Precio i 

End Sub 

Prívate lituJo As String 

Private ISBN As String 

Private Autor As String 

Private Precio As Single 
End Structure 

l )bservr que ahora los miembros de dalos son privados, no públicos de tal 
manera que no pueden ser manipulados desde el esleí ior I os dos pr< u vd i mirti¬ 
los apa reí en delante, aunque igualmente pod fiamos haberlos puesto detrás. II 
primero de ellos es <‘l construido! debido a que hemos usado la palabra New 
ionio i den! i! i rail o r II segundo es un método corriente, al que podemos m\ o- 
car cuando nos convenga. 

Si declarásemos una variable de tipo Libro sin liarle un valor mu ial en ese 
momento, posteriormente no podrí.irnos asignar un valor a sus miembros tomo 
si luu laníos en ejemplos previos Usando el construí lor, a través di* la palabra 


clave New. podríamos etocluar osa asignación, mientras que con el método 
Muestra { ) obtendríamos el contenido. I s lo que se hace en el ejemplo siguien¬ 
te que, al ser ejecutado, genera el resultado de la figura 4,12. l a primera varia- 
hleeslá vacia, mientras que la segunda tiene los valores asignados en el momento 
de la creación. 

Sub Maiíi{ ) 

Diro Unl.ibro As Libro 

Dim OtroLib.ro As Libro New Libro( 

" i ri r roducc i órt a la programación", 

*' 84-4 15 - 1145-4 " , 

"Francisco Cliart.e o-jeda", 

24 . 04 ) 

Untií bro .Muestra ( ) 

OLrol.ibt o.Muest ra ( ) 

End Sub 



Figura 4.12. Contenido de las dos estructuras 


Arréalos 

Los tipos de datos usados hasta ahora, en ejemplos previos, tan sido pueden 
contener un dato, ya sea simple: un numero, un carácter o una cadena, o com¬ 
puesto: una estructura. Cuando se tiene la necesidad de almacenar múltiples 
valores, del mismo tipo \ ion inhumación relacionada, se utilizan los arreglos. 

Un arreglo es una lisio de variables del mismo tipo que comparten el nom¬ 
bre, viist ¡nguiendo.se unas de otras por un índice, los arreglos también son co¬ 
nocidos como mw/r/íVs, «Hinque esta denominación es mas apropiada para los 
arreglos de dos dimensiones. A dherencia di* las estructuras, enumeraciones \ 
demás tipos de datos conocidos hasta ahora, una variable de tipo arreglo no 
aloja el valor sino una ivlerencia al bloque de memoria donde este se encuentra. 

t os arreglos, para ser más exactos cada uno de los elementos de un arreglo, 
punten ser de cualquier tipo: enteros, cadenas, estructuras, referencias a obje¬ 
tos, etc Incluso podemos tener arreglos de objetos creados a partir de una o 



varias clases A mi vez, un arreglo también puede* formar parte de un tipo com¬ 
plejo, como pueda ser una estructura. 


Declaración de un arreglo 

C omo cualquier otra v ariable, un arreglo debe declararse antes de ser lililí- 
/.ado para almacenar valores. I a declaración es, básicamente, igual que la de 
una variable corriente, debiendo especificarse el ámbito, identificado!' \ tipo 
Además, l ras el identificado!’ o nombre de la variable indicaremos, entre paren- 
tesis, el mayor índice que tendrá. 

A diferencia de Visual Basic o, en Visual Basic .NI T no es posible especifi¬ 
car los limites de un arreglo, su indice interior v superior, va que el índice infe¬ 
rior es siempre el 0. Hasta, por tanto, con indicar cuál será el índice superior. I I 
arreglo tendrá, por lanío, un elemento más del valor indicado como india* su¬ 
perior. I n el ejemplo siguiente, por ejemplo, la variable DiasMes seria un arre¬ 
glo con 12 elementos, desde el 0 hasta el II. 

Dim DiasMesl 11) As Integer 

No hay que olvidar que la variable DiasMes lo que contiene es una referen- 
i la al arreglo, v no el arreglo en si. Ksa referencia podemos usarla para acceder 
individualmente a cualquiera de los elementos, disponiendo su índice entre 
paréntesis: 

DiasMes(0 ) - 3 1 
DiasMes{3) - 30 

I os índices, tanto al declarar la matriz como al acceder .1 los elementos, no 
tienen necesariamente que ser valores numéricos constantes también pode¬ 
mos utilizar, por poner un ejemplo. Lis constantes de una enumeración, como 
se hace en el código siguiente: 

Enum Mes 
Enero 
Febrero 
Marzo 
Abril 
Mayo 
.Junio 
.Julio 
Agosto 
üepilembre 
Oct ubre 
Píov lembic 
Diciembre 

End Enum 

Sub Main() 


Dim DiasMes ( Mes. D1 <• iembre ) As Integer 



DiaaMes(M^s-Enero ) * 31 
DiasMes ( Mes «Abri 1 ) =* 30 

End Sub 

í l resultado es exactamente el mismo, pero el i ovillo queda mucho nuN c la- 
ro utilizando oslo nol.n ion en fugar de valores numéricos conslanles. 

Arreglos con varias» dimensiones 

I I arreglo DiasMes declarado en el ejemplo aniel ior cuenta con una sola di¬ 
mensión, de l.il forma que puede representarse urálicamente eomo una lista de 
valores. I I rango de esa dimensión es U-l I, valores que puede lomar su índice. 
Un arreglo puede tener varias dimensiones, hasta un numen» máximo de 60. 
cada una de ellas con un rango diferente 

I I rango de cada dimensión puede contar con tantos elementos como \ «llo¬ 
res posibles hay en el tipo Long. 


Nota 

En la práctica, con aplicaciones corrientes, no es habitual trabajar con arre¬ 
glos de más de dos o tres dimensiones, mientras que el rango de cada una 
de ellas está físicamente limitado por la memoria disponible en el sistema, 
más que por los límites propios del lenguaje. 


Suponga que desea contar con un arreglo en el que ir anotando una serie de 
datos estadísticos de cada una de las 24 horas de los días del ano I a decía 
ración do dicho arreglo podría ser la siguiente: 


Dim Medidasí3b4, 23) As Single 

Mediante la variable Medidas podemos acceder a cualquiera de los 105 ele 
montos de la primera dimensión, cada uno de los cuales cuenta con 24 elemen¬ 
tos de la segunda dimensión. Al ai ceder a un elemento, por tanto, es necesario 
facilitar dos índices: el número del día v el de la hora a la que corresponde la 
medida a almacenar o recuperar. P.l numero total de elementos en el arreglo se 
ra de 105 por 24: N7o0 elementos 

Kanqos dinámicos 

Aunque en los Iragmentos de codigo «interior, al declarar un arreglo, siem¬ 
pre hemos indicado el índice superior del rango de cada dimensión, nada nos 
impide declarar arreglos sin un rango inicial. Si es necesario, sin embargo, m 
dicar el numero de dimensiones con que contara Por ejemplo, si no supiera 
mos de antemano cuantos dias vamos a lomar medidas, en el supuesto del 




punto anterior, ni cuántas horas de cada día. podríamos declarar el arreglo 
Medidas así. 


Dim Medidas (,) As Single 

Mientras no establezcamos el rango de las dimensiones de este arreglo, la 
variable Medidas tiene una referencia nula. Cualquier acceso usando esta re¬ 
ferencia causaría una excepción. Puede utilizar la I unción TypeName( ) para 
obtener el tipo de cualquier variable, o bien usar una expresión TypeOf Is pa¬ 
ra comprobar su tipo. Puede comprobarlo con el código siguiente: 


Dim Medidas(,> As Single 


Consolé . Wr i tel. i ne ( TypeName ( Med idas ) ) 

* Es La expresión devuelve False 
Consolé.WriteLine( TypeOf (Medidas) Is Array) 

El resultado de ejecutar este código es el de la figura 4.13. Puede ver que el 
valor devuelto por TypeName( ) es Nothing, indicando que Medidas no tie¬ 
ne referencia alguna en ese momento. La comprobación de si el tipo de la va¬ 
riable es Array da como resultado el valor False. 
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Figura 4.13. La variable Medidas no tiene una referencia valida 


Nota 

El tipo Array es una clase de la cual están derivados implícitamente todos 
los arreglos que declaremos. A continuación conocerá algunos de los mé¬ 
todos de esa clase, heredados automáticamente por los arreglos. 


Para establecer el numero de elementos de cada dimensión de la variable 
Medidas usaremos la instrucc ion Redim. Esta debe ir seguida del idenlilicador 




del arreglo. Medidas en este caso, y, entre paréntesis, los valores para estable¬ 
cer el índice superior de cada dimensión. Esos valores pueden ser, en lugar de 
constantes, datos introducidos por el usuario o recuperados de una base de da¬ 
tos. En el siguiente fragmento de código, por ejemplo, se pide por teclado el 
número de dias y horas durante las que van a tomarse medidas, usando esos 
valores para establecer el número de elementos del arreglo. 

Dim Dias, Horas As Short 

Consolé.Write("Introduzca el numero de días: M j 
Dias = Conversión . Val (Consolé . Readl.i ne (f ) 

Consolé.Write( M Introduzca las horas por día: ") 
lloras * Conversión . Va 1 ( Consol e . ReadL ine () ) 


ReDim MedidasfDias - 1, Horas - 1) 

El método ReadLine ( ) di* la clase Consolé devuelve una cadena de carac¬ 
teres con el valor introducido por el usuario. Dado que nosotros necesitamos 
el valor numérico, no la secuencia de caracteres que lo componen, usamos la 
función de conversión Val( ) para realizar esa transformación I analmente nos 
servimos de los datos obtenidos para establecer el número de elementos del 
arreglo I íjese en que restamos uno tanto al número de días como de horas, va 
que lo que hay que facilitar a ReDim no es el número de elementos sino el índi¬ 
ce mas alio de cada dimensión. Si tras establecer las dimensiones del arreglo, 
con la sentencia ReDim, comprobamos el tipo de la variable Medidas veremos 
que va no es Nothing, sino Single( , ), y que la comprobación TypeOf ( Me¬ 
didas ) Is Array devuelve True en lugar de False. 

La instrucción ReDim no es útil sólo para establecer el numero de elementos 
inicial de un arreglo, podiendo utilizarse también para modificar dicho nume¬ 
ro cuando interese El rango de elementos de cada dimensión no es algo estatúo, 
sino dinámico, de ahí que podamos alterarlo cuando nos convenga. Si el cam¬ 
bio provoca una reducción del numero de elementos, esta i laro que provocará 
una pérdida de información puesto que los elementos sobrantes serán descar¬ 
tadles. S¡, por el contrario, lo que se hace es ampliar el número de elementos, 
los va existentes pueden conservar el valor que teman simplemente añadiendo 
tras ReDim la palabra Preserve. 

Información sobre un arreglo 

Como se ha indicado antes, todos los arreglos son objetos derivados de la 
clase Array. Dicha clase cuenta con un importante numero de miembros, pro¬ 
piedades y métodos principalmente, que nos permiten tanto operar sobre el 
arreglo comí» obtener información acerca de el. En este momento nos interesa 
lo segundo, recuperar algunos dalos relativos al arreglo sobre el que estamos 
trabajando. Esto es especialmente interesante si estamos usando un arreglo di¬ 
námico que va creciendo o decreciendo según las necesidades del programa. 



Algunos datos son real monte útiles, como el contenido en la propiedad 
Rank, que nos indica el numero de dimensiones, o los devueltos por los méto¬ 
dos GetLength ( ), GetLowerBound ( ) y GetüpperBound ( ) cjue son el núme¬ 
ro de elementos. el índice interior v superior, respectivamente, de la dimensión 
cuyo numero se entrega anuo parámetro. Al igual que los índices, las dimen¬ 
siones se numeran desde l) hasta el valor contenido en Rank menos i 

Otras propiedades tan solo son útiles en caso de que se derive una nueva 
dase tomando Array como base. Es el caso de IsFixedSizeo IsReadOnly, 
ambas de tipo Boolean La primera indica si el arreglo tiene un tamaño fijo y la 
segunda si os de sólo lectura, devolviendo siempre los valores True v False. 
respectivamente 

Conociendo estos miembros de Array, y solo a titulo informativo, podría¬ 
mos codificar un método como el siguiente: 


Sub Inf ormeArreglo( ByVal Arreglo As Array) 
Dim Dimensión As Byte 


If TypeOf (Arreglo) Is Array Then 

Consolé.WriteLine( "_" ) 

Conso le.WriteLine("Tipo del arreglo: (0}" f Arreglo.GetType( )) 

Conso le . Wr it eLi ne ( " I sFi xedS i ?.e — { 0 } *' , Ar r eglo. IsFixedSize ) 

Consolé.writeLine("TsReadOnly = (0)", Arreglo.IsReadOnly) 

Consolé . Writ.eT.iTie 0 ) dimensiones", Arreg 1 o. Rank ) 

For Dimensión = 0 To Arreglo.Rank - 1 

Consolé.WriteLine( "Dimensión {0} tiene {!) elementos", 

Dimensión, Arreglo.GetLength(Dimension)) 

Consolé.WriteLine("índice inferior <0>, superior {1)", 
Arreglo.GetLowerBound(Dimensión), 

Arreglo.GetüpperBound(Dimensión)) 

Next 
End If 

End Sub 

C orno puede ver, primero comprobamos que el parámetro recibido es de ti 
po Array, va que podría ser nulo, tras lo cual procedemos a mostrar diversos 
datos sobre el. El método GetType( ) facilita el tipo de una variable I n oslo 
caso simplemente lo usamos para mostrar el nombre de dicho tipo. Podríamos 
llamar varias veces <i este método, desvie Main{ ), facilitando distintos arre¬ 
glos. El resultado sería similar al de la figura 4.14 

Asignación y copia 

(. uando asignamos una variable que contiene un valor, tomo puede ser un 
entero o una estructura, a otra variable del mismo tipo, lo que hacemos e> co¬ 
piar el valor de una variable a otra, leñemos, por tanto, dos variables con el 
mismo valor, pero independientes entre si. La situación es totalmente distinta 
.il tratar con arreglos va que, como se dijo anteriormente, s»n objetos deriva¬ 
dos de Array v, por tanto, lo que tenemos en Lis variables son referencias 
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Figura 4.14. Información relativa a dos arreglos 


Al asignar una variable de tipo arreglo a oirá, algo que es posible siempre 
que tengan el mismo número de dimensiones v tipo, lo que se hace es duplicar 
la referencia. Ls decir, contaremos con un solo arreglo pero con dos referencias 
a el en dos variables distintas Podríamos, por ejemplo, modificar los elemen¬ 
tos mediante una variable y leerlos con la otra va que. como se ha dicho, en 
realidad existo un solo arreglo, no dos. 

Partiendo de los ejemplos anteriores, en los que teníamos diversos arreglos 
entre ellos uno con dos dimensiones, podríamos usar el código siguiente para 
efectuar lina comprobación simple: 


Dim Medidas(,) As Single 

Dim CopiaMedidas(,) As Single 

ReOim Medídas(100, 6) 

• .. i " Í4 «/h-» ‘ * * •*!.'» • 

CopiaMedidas = Medidas 

CopiaMedidas(0, 0) » 10.7 

Console.WriteLine(Medidas(0, 0)) 

En principio Medidas es un arreglo vacío, sin embargo al llamar al método 
WriteLine( ) para mostrar el elemento (0,0) obtenemos el dato asignado 
mediante CopiaMedidas, otra referencia al mismo arreglo. 

Si lo que deseamos es obtener una copia del arreglo, obteniendo una referen¬ 
cia a ese nuevo arreglo, debemos usar el método Clone ( ) . Es lo que se hace en 
la sentencia siguiente, asumiendo que Medidas y CopiaMedidas ya están de- 
i la radas: 

CopiaMedidas = Medidas.C1onei) 

El método Clone ( ) crea un nuevo arreglo v copia en él todos los elementos 
del original Si dichos elementos contienen valores, como es el caso de Medi¬ 
das. lo que se obtiene es una copia del valor. Si, por el contrario, Jos elementos 





almacenan rote rondas. Clone ( ) no copio los objetos o los que apuntan dichas 
referencias, es decir, se limita a copiar el arreglo. 

Una alternativa a Clone ( ) es el método Copy( ) de la clase Array. lisie 
permite copiar parte de los elementos de un arreglo a otro arreglo, si es necesa¬ 
rio incluso efectuando una conversión entre 1 i pos compatibles. 

Otras operaciones con arreglos 

C orno se ha repetido en vanas ocasiones, los arreglos son objetos, no sim¬ 
ples valores, de clases derivadas de Array. liste hecho abre un abanico de pos i 
bilidades impresionante, especialmente si lo comparamos con las posibilidades 
existentes en Visual Basic f» 

I.a clase Array esta derivada deObject. por lo que \ a dispone de métodos 
existentes en todos los objetos ele Visual Basic NI I tales como GetType( ) o 
ToString ( ) Además, Array implemenla varias interlaces, como ICloneable 
o iEnumerable, que ofrecen métodos para simplificar la copia o enumeración 
del arreglo. 

Ciraciasa la existencia de métodos romo Sort( ), Reverse (), IndexOf() 
\ BinarySearch( ) es posible ordenar los elementos de un arreglo, invertir 
su orden, obtener el índice del elemento que contiene un cierto valor o efectuar 
una búsqueda binaria en un arreglo ordenado, especialmente útil cuando el 
numero de elementos es muv grande, todas estas operaciones, \ algunas mas, 
se describen en la referencia en linea de la clase Array que puede encontrar en 
I«i avuda ile* Visual Basic .NI. I 

Si quiere realizar una prueba simple, ordenando v enumerando los elemen¬ 
tos de un arreglo, puede usar el código siguiente 


Dim Mesesii As String { 

"Enero", "Febrero", "Marzo", "Abril", 
"Mayo", "Junio", "Julio", "AqosLo", 
"Septiembre", "Octubre", "Noviembre", 
"Diciembr e"} 

Dim Valor As String 

Consolé. WriLeI.ine( "Antes de ordenar") 
Consolé . WriteLine( "-" ) 

For Each Valor In Meses 
Con so le . VíriteLine (Valor) 

Next 

Array.Sor t(Meses ) 

Consolé.WiiLeLine("Después de ordenar") 
Consolé. WriteLine( "-“ ) 

For Each Valor In Meses 
Con so I e . Wr i * el. i ne ( Va 1 or \ 


Next 





Figura 4.15. La lista de meses antes y después de ser ordenada 


Nota 

Cuando no se indica explícitamente el índice de un arreglo, al declararlo, 
pero se facilita una lista de valores iniciales, entre llaves, el propio compi¬ 
lador se encarga de establecer el número de elementos. 


I <i construa ¡ón For Each/Next. un, ida en este ejemplo para enumerar el 
contenido del arreglo Meses, utiliza una de las mteilaies de Array para reco¬ 
rrer todos Lis elementos del arreglo sin necesidad de conocer sus índices inte 
i ior \ superior. 

Trabajo con caracteres 

Visual Basic .NI I dispone de dos tipos de datos qtle lacilitan la manipula 
cion de caracteres: Char s String LI primero de ellos es un tipo simple, al es¬ 
tilo de Integer o By te. mientras que el segundo es una ^ lase, como Ar rav A 
pesar de su naluiale/a de tipo intrínseco, como va sabe puede usar el empa¬ 
quetamiento para introducir un carácter en el tipo System.Char. obteniendo 
un oh|clo con el benelic io que ello conlleva. 

I na variable de tipo Char puede contener cualquier carácter del conjunto 
l nicode. I n la plataforma NI l no existen caracteres ASCII, por lo que no es 
necesario estar efectuando conversiones entre los dos conjuntos. I I conjunto 
Unicode facilita la representación de miles de caracteres de todos los alfabetos 
en contraposición a ASCII que. prácticamente, estaba pensado para la lengua 
anglosajona. 

La mayoría de Ion métodos ron que cuenta el tipo Char están destinados a 
facilitar la clasificación de los caracteres. Todos ellos tienen un nombre que co¬ 
mienza por ls v devuelven un valor de tipoBoolean. De esta forma podemos 







saber si el carácter es un dígito decimal: IsDigit{ ), una letra: IsLetter( ), 
un carácter de puntuación: IsPunctuation ( ), etc. También podemoscnnver 
Iir el carácter a mayúscula, minúscula o bien una cadena mediante los métodos 
ToUpper( ). ToLower( ) y ToString( ), respectivamente 

Cadenas de caracteres 


A diferencia de los caracteres individuales. Lis cadenas de caracteres son 
tratadas en Visual Basic .NHT como objetos. Una variable de tipo String al 
macena lina referencia al lugar en el que se encuentra la cadena de caracteres. 
( ada ve/ que se modifique dicho valor se asigno un nuevo bloque de memoria, 
se almacena en el la nueva cadena y la anterior se libera, almacenándose en la 
variable String la nueva referencia. 

l os métodos de la <. lase String nos permiten conocer la longitud de la ca¬ 
dena de caracteres, obtener una parle de ella, reemplazarla, copiarla, acceder .1 
los caracteres individuales, eliminar espacios sobrantes, ajustar a izquierda o 
derecha hasta una longitud indicada, etc. No ha\ mas que echar un \ is(a/o a la 
lista de miembros de la clase String para saber las posibilidades que tenemos 
a nuestro alcance. I a mayoría de los miembros son de* uso simple 

Al igual que en Visual Basic, podemos usar el operador & para unir dos ca¬ 
denas obteniendo la concatenación. Alternativamente puede utilizar el método 
Concat( ) para obtener exactamente el mismo resultado. 

Manipulación intensiva át cadenas 

h) hecho de que cada vez que se* manipula una cadena, por ejemplo concale 
nando otra o extrayendo una porción de* la existente, se cree un nuevo objeto 
en memoria tiene importantes consecuencias en aquellos casos en los que se 
precisa un trabajo intensivo de manipulación de cadenas. TI tiempo consumi¬ 
do cada ve/, que se manipula la cadena, especialmente s¡ esta es muv grande, 
puede ser considerable al repetirse miles de veces. Puede comprobarlo con el 
código siguiente. 


Din Cdiaoleres As String 
Din Contador As Integer 

Dira Ahora As DateTime 

Conso Le. Wr ít e (" Usando el operador i, de String: ") 
Ahora * Now 

For Contador ~ 1 To 32000 

Caracteres - Caracteres b " - " 

Next 


Console.WriteLine(Now.Subtract(Ahora) \ 



Básicamente, añadimos tres caracteres a una cadena 32000 veces. Lo que 
ocupa la mayor parte del tiempo no es el bucle en si, sino la tarea de copiar la 
cadena que cada vez es más grande. Para controlar el tiempo transcurrido to¬ 
mamos una referencia al inicio del bucle, mediante la propiedad Now, y hace¬ 
mos lo mismo al final del bucle obteniendo la diferencia. Ésta vendrá expresada 
en forma de horas, minutos, segundos y pulsos de reloj. 

Podríamos intentar utilizar el método Concat( ), anteriormente citado, en 
lugar del operador &. Veríamos que el tiempo empleado en la operación es 
prácticamente el mismo, en el caso de mi equipo casi treinta segundos en am¬ 
bos casos. 

Cuando las cadenas de caracteres usadas en un programa no sean tan sólo 
valores más o menos estáticos, usados en ciertos contextos donde son necesa¬ 
rios, sino que vaya a efectuarse una manipulación relativamente intensiva, en 
lugar del tipo String nos interesará utilizar el nuevo tipo StringBuilder 
StringBuilder es una clase que se caracleriza por preparar un bloque de 
memoria en el que se almacenara la cadena que va a manipularse, no reasig¬ 
nándose este espacio, ni copiándose la cadena a i.ida manipulación, hasta que 
dicha capacidad haya llegado a su limite. Podemos dejar que la propia clase 
StringBuilder gestione la capacidad del bloque de memoria, que tendrá un 
espacio inicial de 16 caracteres y que ira creciendo cuando sea necesario, o bien 
indicar de manera explícita dicha capacidad en el momento de i rear el objeto. 

l a clase StringBuilder cuenta con un conjunto de métodos similar al de 
String. facilitando la concatenación de cadenas, eliminación y sustitución de 
parles de la cadena. Listas operaciones se efectúan siempre sobre la cadena al¬ 
macenada en el bloque de memoria inicialmente asignado, sin ninguna sobre¬ 
carga adicional. Puede ver la diferencia considerable de rendimiento usando 
un código como el mostrado a continuación: 


Sub Hain( ) 

1 . .'nt 

Dim Caracteres As String 

Dim Contador As integer 

Dim Ahora As DateTime 

Consolé.Write("Usando el 
Ahora * Now 


For Contador = l To 32000 
Caracteres = Caracteres 

Next 


operador í. de String: 


& 




Console.WriteLine(Now.Subtract(Ahora J) 
Caracteres = Nothing 


ConsoLe.Write("Usando el método Concat() de String: *) 
Ahora = Now 

For Contador s 1 To 32000 



Caracteres *= String . Concat ( Caracteres , *' - M ) 

Next 

Console.WriteLine(Now.SubtracMAhora)) 


Consolé. Write( "Usando el met.odo Append() de St.r i nqBn i 1 der : ") 

Dim Caracteres^ As New Texl.StrinqBuilder() 

Ahora - Now 

For Contador = 1 To 96000 
Caracteres2.Append(" - ") 

Next 

Consolé .WnteLine( Now. Subtract( Ahora ) ) 

End Sub 

Como se observa en la figura 4.16. a pesar de gue en oí StringBuilder he¬ 
mos añadido Iros voces mas caracteres, y el propio bucle consume mucho mas 
tiempo al repetirse el triple de veces, apenas consume en total media décima 
do segundo. Los otros dos métodos, usando una variable Strinq. emplean, 
comparativamente hablando, muchísimo mas tiempo. 


ai F:\DatosTrabajo\Ubros\Actuales\PBVisualBasicNET\Ejemplos\... 


llfa*n<ta el operadar & «le Strlnn: M¡fl9:26.25775(S 
IJamidu al mtoilo CvncütO dn String: 

Ur.andu • 1 inetudo AppoixIO StrinnUul Irtai•: 00:00300.8409576 
Pretr* ony Jujy ta aoutimi* 


Figura 4.16. Comparativa de tiempos entre los tres métodos usados 


Constantes 

I n la mavoría de los ejemplos propuestos a lo largo de este capitulo si* han 
usado valores constantes, principalmente numéricas v cadenas de caracteres, 
coníiamlo la deducción de su tipo til lenguaje en base til propio valor I sa de¬ 
ducción, no obstante, en ocasiones no resulta tan obvia. Al encontrar la cons¬ 
tante "P", por ejemplo. Visual Basic .NiI I la trata como de tipo String. pero 
pudiera ser i|ue a nosotros nos interesase gue la tomara como un carái ter, lipo 
Char. AIgo similar puede oíurrir con un numero cualguiera. I I valor 3.1416, 
por ejemplo, seria interprelado como Double esperando nosotros gue lo Inera 
ionio S i ngle. Antigüe podríamos servirnos de Imu iones de convulsión como 
CChar ( ), CDbl ( ) v similares, lo cierto es gue, en el i aso de las constantes lite¬ 
rales. resulta mas lacil utilizar los su rijos enumerados en la tabla 1.3 




Tabla 4.3. Sufijos indicativos de tipo para constantes literales 


Sufijo 

Tipo 

Ejemplo 

C 

Char 

” P " c 

1 

rnteger 

341 

S 

Short 

34S 

L 

Lonq 

3 4 L 

R 

Double 

3.1416D 

F 

Single 

3.1416F 

D 

Decimal 

34 D 


Nota 

Se conoce como constantes literales a los valores introducidos como tales 
en el código del programa, sin estar representados por ¡dentificador algu¬ 
no. Son literales 34, True o "P". 


Una alternativa al uso di* literales \ sufijos, rspecialincnlo recomendable por¬ 
que contribuyea hacer mas claro el código, consiste en representar las i onstan- 
les medianil' idenlil icadores, como en el caso de las variables I a sintaxis para 
declarar una constante es, de hecho, publicamente idéntica a la de una varia¬ 
ble, tan solo hav que añadir la palabra Const delante del ideiitilicador I as 
constantes pueden aparecer en los misinos puntos donde puede dectararse una 
variable, asi como contar con los misinos modilicadores de visibilidad. 

I I uso de constantes no hiérales hace que el codigo quede mas claro. I n un 
e|emplu anterior usábamos dos constantes, v 2j f para establecer el numero 
de elementos de un arreglo I amblen podríamos hacerlo asi. 

Const Días As Short <bS 

Const Horas As Byte 24 

Din Medídasf Días - l, lloras - 1) As Single 

No solo el codigo queda más claro, sino que una hipotétka modificación de 
los valores los v 24 resultaría mucho mas simple: bastaría con cambiar la de¬ 
claración de las constantes. Si hubiésemos utilizado las literales, nos veríamos 
tor/ados «i buscar su aparición poi lodo el codigo 


Puntos clave 


• lodos los tipos «.le datos de Visual Basit NI I tienen al tipo Ob ject con 
raí/ común, dando lugar a un sistema de tipos totalmente unilicadoen el 
que todos los valores pueden sei tratados como objetos. 





• I os (ipos de Jeitos pueden clasificarse en dos grandes ramas* los derivados 
de ValueType. que almacenan directamente el valor, v todos los demás, 
con una referencia a un bloque de memoria donde se encuentra ese \ alor 

• Visual Basic NI I sólo contempla como nativos los tipos de dalos de la 
plataforma .NI I que forman parte de la especificación ( I S. 

• I as v arrabios, constantes v enumeraciones pueden tener básicamente tres 
ámbitos: loc al a un método o bloque etc* codito, local a un modulo o clase 
o global a todo un ensamblado 

• I as estructuras tan sólo pueden definirse al nivel de modulo o c lase-, pero 
no en el interior de una función. 

• I n Visual Basic .M I es posible declarar múltiples variables di- un mis¬ 
mo típe» espec ificando éste una sola ve/, al final. 

• I n el mismo momento de la declaración es posible la asignac ion de mi va¬ 
lor inicial. 

• I as enumeraciones posibilitan la creación de nuevos tipos de datos sim¬ 
ples, basados en el uso de un subrango de enteros. 

• Mediante las estructuras podemos crear tipos complejos, con múltiples 
miembros de cualquier tipo, además de- métodos v constructores 

• I os arreglos son listas o matrices de* elementos que, compartiendo un 
mismo nombre v tipo, se distinguen entre si por uno o varios índices. 

• Kn Visual Basic NF I el indice interior de un arreglo siempre es el cero 
mientras que el superior se especifica en el momento de la declaración o 
con la instrucción ReDim. 

• h I número de* dimensiones de un arreglo es I i jo desde el momento en que 
se dec lara, mientras que el número de elementos de cada dimensión es 
un factor dinámico. 

• lodos los arreglos son objetos derivados de Array, por lo que podemos 
usar los métodos de* dicha clase con el fin de operar sobre el arreglo u ob¬ 
tener información sobre el 

• l\ira trabajar con cadenas de caracteres Visual Basic NI I dispone* de dos 
tipos distintos* String v StríngBuilder I I primero es <-| osado habí 
tualmenle, mientras que el segundo obtiene un mejor rendimiento a la 
hora de una manipulación intensiva efe las cadenas. 

• Cirac iasal uso de constantes es posible* clarificar el código v facilitar su 
mantenimiento. 

Resumen 


Al finalt/ar este capitulo tenemos la información suficiente como pata utili¬ 
zar cualquiera de los tipos de dalos básicos de V isual Basic NI I. usándolos 



para declarar variables, definir constantes e introducir literales en el código, 
lambien liemos aprendido a crear nuestros propios tipos de datos, mediante 
enumeraciones y estructuras, finalmente, heñios visto como crear v usar arre¬ 
glos, así como el uso básico de las cadenas de caracteres. 

Muchos de los elementos vistos pueden combinarse entre si, dando lugar a 
construcciones más complejas. Ln una estructura, por ejemplo, podemos con¬ 
tar con uno o más miembros que sean arreglos o estructuras. I os elementos de 
un arreglo no tienen por qué ser enteros o cadenas de caracteres, también pue¬ 
den ser estructuras, objetos e, incluso, otros arreglos. Son casos puntuales con 
los que irá encontrándose a medida que vaya desarrollando provectos con Vi¬ 
sual Basic .NI 7 1 







5 

Operadores 
y expresiones 


F.n el capitulo previo hemos conocido los tipos de datos intrínsecos de Vi¬ 
sual Basic NET, asi como la manera de usarlos para construir nuestros propios 
tipos, declarar variables y constantes o usarlos como elementos de arreglos. 
Los valores, independientemente de dónde se encuentren almacenados, se uti¬ 
lizan en su mayor parle como operandos de expresiones con el fin de producir 
resultados. 

Una expresión es una combinación de operandos, los valores sobre los que 
va a actuarse, y operadores, que indican las operaciones que van a efectuarse, 
obteniendo un solo valor final. Las expresiones pueden ser aritméticas, relació¬ 
nales y lógicas, combinándose muchas veces entre sí formando expresiones 
complejas. 

Nuestro objetivo, en este capitulo, es conocer la mayoría de los operadores 
con que cuenta Visual Basic .NET, algunos de los cuales ya hemos conocido en 
ejemplos del capítulo anterior. Es el caso del operador de asignación, =, y con¬ 
catenación de cadenas, &. Con esto daremos un paso más en el conocimiento de 
los elementos del lenguaje, especialmente de aquellos que resultan fundamen¬ 
tales como es el caso de los operadores. 


Asignación de valoree 


Seguramente la expresión más simple que podemos encontrar es la de asig¬ 
nación. En ella interv iene un operador y dos operandos: el valor a asignar, a la 









derecha del operador », y el receptor, a su izquierda, El receptor puede ser una 
variable, un elemento de un arreglo, un miembro de una estructura o una dase 
o una propiedad. En general, cualquier identilicador que sea capa/ de conte¬ 
ner un valor del tipo que pretende asignarse. 

El valor puede ser una constante, literal o no, otra variable del mismo tipo o 
bien una expresión que devuelva un valor válido. En la mayoría de los ejem¬ 
plos del capitulo anterior hemos efectuado diversas asignaciones utilizando el 
operador =. 

Una novedad de Visual Basic NFT es la existencia de operadores abrevia¬ 
dos para asignación de expresiones en las que el primer operando es el propio 
receptor del valor resultante. Imagine que quiere incrementar el valor conteni¬ 
do en una variable. En Visual Basic 6 usaría una expresión como la siguiente 

Valor « Valor ♦ 1 

En Visual Basic NI I esta expresión puede simplificarse utilizando el ope¬ 
rador + =, tal v como se hace a continuación. 

Valor 1 

Como puede suponer, el resultado es exactamente el mismo. De hecho, el 
código MS1L. generado por ambas sentencias es idéntico. Además del opera¬ 
dor +*, como versión abreviada del operador aritmético + , también tenemos a 
nuestra disposición los operadores -= f / =, \=, v &=, equivalentes a *, 

/, \, ‘ v & pero asumiendo que el primer operando de la expresión sera la mis¬ 
ma variable que va a recibir el resultado. 

Operadores aritméticos 

La finalidad de esta familia de operadores es permitirnos realizar el conjun¬ 
to de operaciones matemáticas mas básico, como son la suma, resta, multipli¬ 
cación v división. Cualquiera de estos operadores siempre loma dos operando* 
v genera un resultado. En la tabla 5.1 podemos ver un resumen de estos opera¬ 
dores, junto con la operación que realizan. En esta tabla Ni representa al pri¬ 
mer parámetro, el que se sitúa a la izquierda del operador, v N2 al segundo, a 
la derecha del operador. 

Tabla 5.1. Operadores aritméticos 

Operador Operación aritmética que efectúa 

+ Suma de NI y N2 

Halla la diferencia entre NI y N2 
Multiplica NI por N2 
Divide NI entre N2 


/ 




Operador Operación aritmética que efectúa 

\ Divide NI entre N2 sin hallar decimales (división entera) 

Eleva NI al exponente indicado por N2 
Mod Resto de la operación NI \ N2 

Estos operadores, como es obvio, trabajan sobre cualquiera de los tipos nu¬ 
méricos que conocemos, enteros o coma Ilutante, independientemente de su 
precisión Sin embarco, cuando, en una misma expresión utilicemos operan dos 
de distinto tipo numérico Visual Basic realizara las conversiones necesarias pa¬ 
ra guardar la mavor precisión posible I raba jando con números los primeros 
cuatro operadores no requieren ningún tomen la rio adi i i onal, se limitan a reali¬ 
zar Lis cuatro operaciones aritméticas indicadas I I operador \ realiza la divi¬ 
sión enlera, es decir, la única diferencia con el operador / es que este último 
puede generar una parle decimal en el cociente de la di\ isión, mientras que el 
primero no 

Precisamente para hallar el resto de esa división entera podemos utilizar el 
operador Mod. que loma exactamente los mismos parámetros y realiza la mis¬ 
ma oper.u ion que \, la división entera, con la timea diferencia de que no nos de 
\ url\ e el i en ¡ente obtenido, sino el resto. 

Por ultimo tenemos el operador ', que nos permitirá rcali/ai poten* ¡ai iones, 
ai loando como base el operando que se situé ti la izquierda v como exponente 
el que se encuentre a la derecha. 

Por medio del operador + podemos trabajar, ademas, con cadenas de cara* 
teres, tipo String. siendo en este caso el resultado la concatenación de ambas. 
Obtendremos, por tanto, una nueva cadena lomuda por la primera mas la se 
gunda En Visual Basic existe un operador, &, que tiene precisamente la linali 
dad de concatenar dos dalos lor'inando una i adena, siendo prole rente el liso de 
este operador sobre + 

I n el caso de que en una misma expresión se utilicen distintos operadores 
aritméticos v no se alteren Lis prioridades, por medio de paréntesis, siempre se 
ev aluaran primero las potenciaciones, después los operadores /. * \ \ Mod de 
izquierda a derecha, y por ultimo + v - de izquierda a derecha. 

Operaciones con variables Ob ject 

C liando realicemos operac iones aritméticas con variables del tipo Object 
o! resultado vendrá dado por el tipo de* dato que en ese momento contenga la 
variable, que puede ser numérico, de cadena, techa u otro tipo, y el segundo 
Operando, alterando el tipo del receptor del resultado cuando sea necesario. 
I V esta lumia, una simple suma puede cambiar el tipo de dalo de Integer a 
Doub 1 e o a St. r i nq, según los casos. ( )bser\ e el i óiligo siguiente: 

Dim Valor As Object b 

Consolé . Wr LteLine< " { 0 } -> {l} 1 '. Valor, Valor .He» Type . Tos Lr inq ( ) ) 




Valor = Valor l 1 

Consolé . WríteLine( " (0 } —> (1)'*, Valor, Va I oí' . GelType . ToSCr ing ( > ) 

Valor f• 1 .b 

Consolé .WriteLlnef" (0 l —* (íl“# Valor, Valor. CíetType .ToSt r ing 1 ) ) 

Valor i. H pesetas" 

Consolé.Writel.in«("(0> -> (1 } " , Valor, Valor.GetType.ToString()) 

fui el contamos con una variable de tipo Ob ject que, i ni» ial mente, * on tiene 
el valor numérico 5. Recuperamos el tipo, de la propiedad GetType, v lo mos¬ 
tramos como una cadena de caracteres, con ToString( ) Acto seguido suma 
im>s un valor numérico entero v mostramos de nuevo el tipo, que no se había 
\ isio alterado Al sumar un numero con parte decimal, sin embarco, el tipo de 
l.i variable umibia v l<> mismo ocurre al concatenar una cadena ! s al^o que 
puede ver en la lisura 5 I. que es el resultado obtenido al ejecutar ese codito. 

I óticamente, utilizando una variable do un tipo especifico, como Integer. 
esas conversiones automáticas no podrían tener lugar. También podemos evi¬ 
tarla en el tipo Ob ject simplemente activando la comprobación estricta de tipos 
de Visual Basic NI I i liada en un capitulo pro\ i o, bien disponiendo la senten¬ 
cia Option StricL Onal inicio del módulo o modificando la opcion equiva¬ 
lente en la ventana de propiedades del provecto. 


si F:\DatosTrabajo\LtbrosVActuales\PBVlsualBasicNET\Ejemplos\.. 


Ja x: 


> Syston. Jnt.1V 
-> Sy:t<n.Int32 
?,5 -> Suitcn. Oauble 
7.S (MTtntAO -> Sy»ron.Strlng 
Press eny Itey to continua 


Figura 5.1. El tipo de la variable cambia dinámicamente 


Operadores relaciónales 

Iste conjunto de operadores nos peí mil irán evaluar represiones \ obtener 
dos resultados posibles True. si la expresión im ioi la o de\ neis e un valot dis 
lmío de erro, o False. si la expiesion es lalsa o de\ uelve v ero. I ambien se les 
i ouoee i (iiili* operadores ile comparación. Se utili/ari priiu i pal monte en osl i m - 
luías dr dei ision, en l,»s que dependiendo drl valor «obtenido se loma un cami¬ 
no n otro, \ tli* control de repeló ion. 

ID la tabla 5 2 se enumera t a Ja uno de los ope laderos de i oí Vi para» ion. jun 
lo » on una pequeña des» rip» ion en la que N I representa al primer operando \ 
N2 al segundo 



Tabla 5.2. Operadores relaciónales o de comparación 


Operador 

Devuelve True si 

Devuelve False si 

= 

NI y N2 son iguales 

NI y N2 son distintos 

<> 

NI y N2 son distintos 

NI y N2 son iguales 

< 

NI es menor que N2 

NI es igual o mayor que N2 

< = 

NI es menor o igual a N2 

NI es mayor que N2 

> 

NI es mayor que N2 

NI es igual o menor que N2 

>= 

NI es mayor o igual a N2 

NI es menor que N2 


Por medio de estos operadores podemos comparar números, cadenas y te¬ 
chas. En el caso de los números será su valor el que intervenga directamente en 
la relación. Si comparamos dos cadenas en realidad se compararan los códigos 
de cada uno de los caracteres que la componen, de tal forma que "Mañana" no 
sera igual a "mañana", ya que el código de la ' M ’ no es el mismo que ' m ‘ 

Al trabajar con dos techas so utilizará la representación interna de las varia¬ 
bles tipo Date para saber si una fecha es igual, anterior o posterior a otra. I lay 
que tener en cuenta que una variable del tipo Date además de la lecha también 
puede contener la hora, por lo que al realizar una comparación puede que no 
obtengamos el resultado esperado. Por ejemplo, «.los variables Date pueden 
contener la fecha del día de hoy, pero si una tiene una hora y otra no, o tiene 
una hora distinta, las variables no cumplirán la relación de igualdad. 


Nota 

En la comparación de cadenas interviene una opción de Visual Basic .NET, 
Option compare, que por defecto tiene el valor Binary. Introduciendo 
la sentencia Option Compare Text al inicio del módulo, o modificando 
la opción equivalente en la ventana de propiedades del proyecto, consegui¬ 
remos que el lenguaje no distinga entre mayúsculas y minúsculas, de tal 
forma que "Mañana" sí sería igual a "mañana". 


Es posible utilizar en una misma expresión operadores aritméticos v relació¬ 
nales, caso éste en el que, antes de que se evalúe una expresión relacion.il, pre¬ 
viamente se realizarán los cálculos aritméticos necesarios para que los operandos 
a comparar sean sólo dos. 

Operadores lógicos 

En ocasiones una expresión relacional no está compuesta tan sólo de dos ope¬ 
randos y un operador de comparación, sino que son necesarios varios opera¬ 
doresy más operandos. En estos casos hay que unir las distintas subexpresiones 







por medio de algún elemento. i|iie fije a su ve/ unas reglas entre cada una de 
las relaciones. Entre otras esla es la finalidad do los operadores logóos 

I os operadores lógicos, a excepción del operador Not. loman dos expresó» 
nes noimalmenle relaciónales, que como sabemos pueden devolver True o 
False. < on esta pareja di' valores el operador reali/a otra operación, en este 
caso logó a, para obtener un solo valor. I n la labia r vo puede eiuontiai los dis¬ 
tintos operadores lógicos, asi como los valores que devuelven según que Lis 
expresiones de entrada sean ciertas <> lalsas II representa el valor devuelto 
por l.i primera expresión \ E2 el dev uolto por la segunda C omo va se ha dn ho 
estos valores solo serán True o False 


Tabla 5.3. Opeiadores lógicos 


Operador 

Devuelve True si 

Devuelve False si 

And 

El =True y E2 True 

En cualquier otro caso 

Or 

El -True 0 E2 Ti ue 

E1=Falee y E2 False 

Xor 

El Ti ue y E2=False 0 
El-FaLse y E2-True 

El=True y E2-Tiue 0 
E1=Falbe y E2- False 

Not 

E1=Fa1se 

El -True 


Como podrá ver, el operador Not sido toma un para mello v lo que hatees 
devolver el valor inverso al devuelto por la expresión Por ello se le llama o pe 
rador de negación. 

Aunque podemos ulili/ar estos operadores para obtener un resultado v al¬ 
macenarlo en una variable de tipo Bolean, lo habitual, como ocurre ton los 
operadores relaciónales, es que los usemos en el contexto de una srntem ia 
condicional o de control de repetición Conocerá ese tipo de construcciones en 
el próximo capitulo 

Operadores de circuito corto 

L na particularidad de Lis operadores lógicos de \ isiial Basic que le diferen¬ 
cia de los equivalentes en la macona de los tiernas lenguajes, es que ev alúan 
todas las subexpresiones siempre, incluso cuantío no es necesario Suponga 
que llene la siguiente expresión condicional: 

I £ 1 >5 And Compruebe* ( ) Then 

l.stá i laro que I no es mayor que por lo que en la práctica, no sena iu* 
cosario tomproh.il la suhexpiesjon que hay detrás del operador And Al ser 
False la primera el resultado sera False, independientemente del valor que 
pudiera dev olv er la función Comprueba ( ) Visual Basic, sin embargo llama 
ría a esa luncion Puede comprobarlo con el redigo siguiente 


Sub Kam( ) 




If 1 > 5 And Comprueba{) Then 
Console.WriteLine( 

"Es cierto, 1 > 5 y Comprueban devuelve True") 

Else 

Consolé.WriteLine("1 no es mayor que 5") 

End If 
End Sub 


Function Comprueba () As Boolean 

Consolé.WriteLine{"Comprueba() se ejecuta") 

Return True ‘ devolvemos True como resultado 

End Function 

Al ejecutar este programa obtendría un resultado como el ríe la figura 5.2, 
en el que podemos ver que la función Comprueba ( ) se ha ejecutado, algo que 
en la mayoría de los lenguajes no ocurriría. Algo similar pasa con el operador 
Or. Analicemos la siguiente sentencia: 

If 1 < 5 Or Compruebaf) Then 

F.n este caso quiere ejecutarse la sentencia que haya tras el condicional en 
caso de que I sea menor que 5 o bien Comprueba ( ) devuelva True. Dado que 
la primera subexpresión devuelve True, I es menor que 5, no habría necesidad 
de evaluar la que hay detrás de Or, si bien Visual Basic la evalúa. 



Figura 5.2. Podemos ver que la llamada a Comprueba ( ) se produce 


Visual Basic .NKT cuenta también con dos nuevos operadores lógicos, lla¬ 
mados AndAlso v OrElse, que evalúan la expresión lógica utilizando lo que 
se conoce como citcnilo corlo, que es el utilizado en la mayoría de los lenguajes 
Usando AndAlso, si la subexpresión que hav a la izquierda es falsa la de la de¬ 
recha no llega a evaluarse. Puede comprobarlo modificando el código «interior 
Lo mismo ocurre con OrElse, que no evalúa la subexpresión que hay a la de¬ 
recha si la de la izquierda es cierta. 







Operaciones entre bits 

Adenitis de realizar operaciones lógicas, los operadores vistos en la tabla *v.3 
también nos permiten manipular los bits individuales dentro de un numero 
I n ocasiones, sobre todo cu.nulo se realizan operaciones con funciones do bajo 
nivel, necesitamos comprobar si un cierto bit de un dato está entendido o apa 
gado, o bien precisamos poner a t) o I un cierto bit. Para poder trabajar a n¡\ el 
de bits es básico conocer la base 2 o binaria, como se pasa un numero de deci¬ 
mal a binario o viceversa 

Partiendo de las reglas de cada uno de los operadores v asumiendo que un 
bit a 0 indica Fa lse mientras que un bit a I significa True, es iVk il comprender 
el funcionamiento de las operaciones entre bits. Vamos a detallar seguidamen¬ 
te las tres actuaciones más habituales. 

Si deseamos poner a I un bit de un determinado dato, llamémosle NI, utili¬ 
zaremos el operador Or. I sle tiene la característica de actuar sobre dos opera¬ 
dores v si cualquiera de ellos es True (I) el resultado es True. Por lo tanto, si 
tenemos N 1 \ realizamos una Operación lógica Or con el numero 0 ¿que ocurri¬ 
ría?; nada, NI quedaría igual, va que si en el un bit esta a 0 al realizar un Or 
con 0 obtenemos 0, mientras que si un bit estaba a 1 al realizar un Or con 0 se 
obtendrá de nuevo 1 

Partiendo de esta base vamos a suponer que NI contiene el conjunto de bits 
00001001. que equivale al numero 9. \ descarríos .u tivar el segundo bit 1 Ion¬ 
deemos que realizar una operación lógica Or con un número cuvo segundo bit 
este a 1 v el resto a 0, de tal forma que no se modifique ningún bit recuerde la 
operación que liemos realizado antes, excepto el que liemos puesto a I. II nu¬ 
mero que necesitamos es el 4, cuya representación binaria, 00000100. tiene a 
1 tan solo el bit que necesitamos Pruebe a ejecutar simplemente la insti tuí ion 
Consolé . WriLeL i ne( 9 Or 4 ), obtendrá como resultado 13. que pasado a 
decimal es 0000110 1. _ 

I <i operación contraria, poner un bit a 0, la llevaremos a cabo con el opera 
dor que es luncionalmente contrario And. Si tenemos un número, llamémosle 
NI. v realizamos una operación lógica And entre el y otro número cuyos bits 
estén lodos a 1. el resultado obtenido será de nuevo NJ Por lo tanto, para po¬ 
ner .i 0 un cierto bit tendremos que hallar un numero que tenga a 1 todos sus 
bits excepto aquel que deseamos ponet a 0. Siguiendo con el ejemplo anterior, 
supongamos que NI ahora tiene el valor 0000 l 10 1. Iras la opera t ion olee loa¬ 
da, v deseamos apagar el segundo bit. Necesitaríamos entonces la secnetn la de 
bits 1 l 1 i 1011, que es la del numero 2 5 1 Iqeciile a continuación la seutein i a 
Consolé .Writel. i ne( 13 And 25 I > \ vera cuino obtiene el 9 que lomamos 
originalmente. 

Por ultimo tenemos que poder comprobar si un í ierto bit está encendido o 
apagado, a 0 o 1. I a técniui mas fácil v común es poner a 0 todos los bits ex¬ 
cepto el que se desea comprobar, ''i el numero resultante es 0 es porque dicho 


1 I us WtK -.«• mtnirr.ui iK* »lrir< h.i .i i/t|nii'iif.i. ilnsUt* rl !>tl 0 liast.i el luí I'hi lo f.mto en rsji ■ .i»n 
|»il> »|ii*- r-a.in .1 I mui rl bil 0 í ^ 



bit estaba ti O, si se obtiene otro numero es porque estaba a 1 Volvamos lina 
ve/ mas sobre el ejemplo anterior. I n este caso NI vuelve a tener el valor 9 v 
queremos comprobar si el segundo bit esta apagado o encendido, por lo que 
deberemos apagar lodos los bits menos ese. I a mascara de hits necesaria es 
0000010 0, que corresponde de nuevo al número 4. l.jecute aluna la sentencia 
Consolé . Wr iteL ine (( 9 And 4) o 0) v observo el resultado, Fa 1 se I lio 
indii a que la expresión es falsa, que el segundo bit no está a l en el número 9 
Realice la misma prueba con el número 13 v vera como el valor devuelto es 
True, va que en el si esta a 1 dicho bit. 

Con el lin de aclarar algo mas el concepto de trabajo con bits vamos a crear 
un pequeño programa cuca finalidad sera mostrar la representación binaria de 
los números 0 a 2 55. I I resultado se muestra en la ligura 3.3. I I código necesa¬ 
rio esta estructurado en tres bucles, tal v como puede verse a continuación. Los 
dos primeros distribuyen la inlormacion en 64 lilas por 4 columnas, el valor 
mínimo de I y K es 0, siendo 1 = 0 y K = 0 la operación T*4+K devuelve 0, mien¬ 
tras que el valor máximo es 2 5 5, siendo 1 = 6 3 y K = 7 la misma operación de- 
\ lid ve 2 55. 

Cualquier numero comprendido en este rango se puede representar ron ocho 
bits, por ello existe un tercer bucle, controlado por la variable J, que recorre 
esos oclio bits pero en sentido inverso, de 7 a 0. va que como recordará los hits 
se numeran de derecha a izquierda. 

Tata saber si el número generado por I*4+K tiene a I un cierto bit, debere¬ 
mos realizar una operación lógica And con un numero que tenga a 0 todos los 
hits menos el que se desea comprobar, que es el bit J. Para crear dicho numero 
se realiza la operación 2* J, siendo 2 la base de numeración binaria y J el nu¬ 
mero de bil a comprobar. 

Por lo tanto, si el resultado de la operación es True es que el bil esta a 1 \ 
asi se imprime, mientras que en caso contrario es 0 

Dira I, J, K As Integer 

For 1*0 To 63 

Consolé. Write (" { 0 {1 y- , 1*4, vbTab) 

For K 0 To J 

For .1 - 7 To 0 Step -| 


I f I * 4 »■ K And 2 .7 Then 

Consolé.Write<"1") 

E1 se 

CousoIh.Wi it e( "0 1 * ) 

End I f 
Next 

Conso Ie.Wiite{vbTab \ 

Hext 

Consolé . Wri teT.ine( > 

Next 




Figura 5.3. Representación binaria de los números 0 a 255 

Expresiones con referencias 

1 .os operadores relaciónales, especialmente el operador = de igualdad no 
pueden utilizarse siempre con todas las variables. Hn los ejemplos anteriores 
siempre liemos 1talado con variables que almacenan \ alores, lo cual no plantea 
problema alguno. Al tratar con variables que mantienen referencias, sin einbar 
go, el » aso es distinlo 

Aunque en Visual Kasic os un.i posibilidad i nr\ i si en le. olros lenguajes NI I 
i orno es el».aso de C * v C * tienen la capacidad! de laci litar una implóme ni ación 
a medida en mis » lasos para ciertos operadores, poi ejemplo el de asignar ion e 
igualdad f si o no implii a, sin embarga», que bulas las i lases cuenten con una im- 
plemenbu ion do ese operador l’uede comprobarlo la» límenle » on osle » ódigo 

Dim Ventanal, veni an,i/! As Object 


Ventanal 5 AppPoWH i n . i'm ron l Dama i n 



Ventana2 - Ventanal 


Consolé . Wr i te i, i ne( Ventana 1 .GetType ,ToString( ) ) 

Consolé.WriteLine(Ventanal * Ventana?) 

Al ojeeLitarlo verá que aparece oí tipo ció Ventanal poro. Jo inmediato, so 
produce una excepción (véase la figura 5.4). I o que ocurro os que la clase App- 
Domain no dispone do una ini plomen lición del operador = para comprobar si 
dos referencias son ¡guales. 
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Figura 5.4. La comparación de las dos variables causa una excepción 

La solución a osla necesidad, comprobar si dos variables tienen una referen¬ 
cia al mismo objeto, la encontramos en el operador Is. Basta con sustituir la 
expresión Ventanal = Ventana2 por Ventana 1 Is Ventana2 para obte¬ 
ner el resultado esperado. 

Otro caso peculiar es el que se presenta, como veremos en el capitulo dedi¬ 
cado al trabajo con clases de objetos, cuando necesitamos comprobar el tipo de 
objeto al que mantenemos una referencia en una variable. I lay que tener en 
cuenta que hablamos del tipo del objeto, no del valor que contiene la variable, 
por lo que no son titiles operadores como = o Is. En este caso el operador a 
usar, lo utilizamos en un capítulo previo, seria TypeOf Is. En la sentencia si¬ 
guiente, por ejemplo, puede ver cómo comprobamos si el tipo del objeto al que 
apunta Ventanal es AppDomain. 

Consolé.WriteLlne( TypeOf (Ventanal) Is AppDomain) 


Puntos clave 


Una expresión es una combinación de operandos v operadores que tiene 
por finalidad efectuar una o mas operaciones obteniendo un resultado. 



• Las expresiones simples pueden ser aritméticas, relaciónales \ lógicas, 
siendo habitual la combinación de oslas categorías formando expresiones 
mas complejas, 

• Existen versiones abreviadas de operadores aritméticos que loman como 
primer operando la variable destinatario del resultado, 

• I os operadores aritméticos facilitan las operaciones básicas: suma, resta, 
multiplicación, división, división entera, resto v potenciación 

• Mediante los operadores relaciónales se establece una comparación entre 
los operando*. obteniendo como resultado True o False según que la 
relación sea cierta o no, respectivamente. 

• Los operadores lógicos se utilizan, principalmente, para unir múltiples 
expresiones relaciónales y obtener un resultado único. 

• Visual Basic .NL I dispone de dos nuevos operadores lógicos. AndAlso \ 
OrElse. Son equivalentes a And y Or pero usan el sistema de evaluación 
de circuito corto. 

• También podemos usar los operadores lógicos para manipular bits de un 
dato o comprobar el estado de esos bits. 

• Para comprobar si dos variables mantienen una referencia a un mismo 
objeto debe utilizarse el operador Is, en lugar de *. 

• Fl operador TypeOf Is nos permite comprobar el tipo del objeto corres¬ 
pondiente a la referencia almacenada en una variable. 


Kesu metí 


Ahora que conocemos los operadores disponibles en Visual Basic .NL I po¬ 
demos, en la practica, efectuar cualquier operación sobre los datos de la aplica¬ 
ción: operaciones aritméticas, comprobaciones relaciónales \ composiciones 
lógicas. Muchas de estas expresiones tienen utilidad por si mismas, por ejem¬ 
plo una operación aritmética para obtener un resultado \ almacenarlo en una 
variable, mientras que otras se aplican en diversas construcciones que tendrá 
ocasión de conocer en el próximo i apitulo, como los condicionales s los bucles 
Ln la plataforma .NI I existen ámbitos que contienen servicios mediante los 
cuales se facilitan operaciones más complejas Fn el ámbito System, por poner 
un ejemplo, existe una dase, llamada Math, en la que encontrará mullilud de 
funciones para realizar operaciones aritméticas y trigonométricas, como Sin ( ). 
Cos(). Round ( ),Pow() oS±gn( ). Otras .clases, como DateTime, cuentan ton 
métodos rspei i ticos para operar sobre el lipo de dalo concreto que almacenan. 










6 

Estructuras 
á& control 


I radie ion al monte rl lenguaje BASIC' ha sido uno de los mas pobres en e. llan¬ 
to «i estructuras de conlrol se re! ¡ore. disponiendo l.in sólo de una sentone ta pa¬ 
ra tuina de decís unios, 1 E/Then/Else, que no podía exceder de una linea v una 
sentencia para la ejecución de hueles. For/Next. I sle hecho conv irtió al Ion 
gua|e BAS|t en uno de U>s menos estrui turados \ por supuesto, mnv «dejado 
de la elegante estructuración del código de Pastal e» < la causa: instrucciones 
umm GoTo o GoSub, que hacían uno la ejecución sallase de un punió a olio del 
programa, dificultando su seguimiento en ocasiones, haciendo poco ilesci- 
1 1 able sil luncionamiento. 

Alorttmadamente \ isual Basu NI I dispone de nuu has mas estría turas de 
control i|iu' sus antepasados, como tendremos ocasión de ver en este capitulo. 
I slas nuevas estructuras alee, tan a sentencias va existentes e incorporan otras 
nuevas, como el control estructurado de excepciones. Si usted ha programado 
anteriormente con otras versiones ele BASIC que careciesen de estructuras de 
control, acostumbrado por lo tanto a los saltos de* un punto a otro del progra 
ma. ver»» e orno en Visual Basic es posible ese rihir apluai iones enlei as sin ulili 
/ai un solo GoTo. 

Estructuras condicionales 

l n miabas ocasiones las lineas ele i enligo de un método im si* e|eculan di» 
lorma su ueni lal. sino que dependiendo de* que la o\ ahí.a ión de- una expresión 









sea cierta o talsa se toman distintos caminos, o se ejecutan distintas instruccio¬ 
nes. I as sentencias que nos permiten realizar esta operación son las condicio¬ 
nales, basadas en la evaluación de expresiones en lasque intervienen, por regla 
general, operadores relaciónales y lógicos. 

Tara evaluar una expresión simple podemos utilizar la estrío tura 11 / Then, 
que ya hemos visto en algunos de los programas de los capítulos anteriores. 

I ras la sentencia Tf dispondremos una expresión a evaluar, que puede estar 
formada por operandos de cualquier tipo \ operadores, tanto aritméticos como 
relaciónales o lógicos. Como va sabemos, cualquier expresión de este tipo se 
reduce a dos resultados: verdadem o distinto de 0, en caso de que la expresión 
se c umpla, y falso o 0. en caso de que no sea así. I n el primer caso la sentencia 
que se baya dispuesto tras Then sera ejecutada, en el segundo caso no se ejecu¬ 
tará. Por ejemplo, suponga que desea dar el valor 1 a una variable en caso de 
que otra tenga o no el valor True l a sentencia necesaria podria ser: 

If Variable * True Then Resultado ■* I 

I n este caso la expresión es Variable = True, una expresión relaciona! 
lin caso de que sea cierta, si la variable' contiene ese valor, entonces se ejecutara 
la sentencia Resu Ltado = 1. lista expresión puede quedar aun unís reducida, 
va que Variable, asumiendo que es de tipo Boolean, puede contener solo 
dos valores: True o False. y su valor puede ser utilizado directamente como 
expresión. 

If Variable Then Resultado 1 

Obtendremos exactamente el mismo resultado, la expresión sera cierta si 
Variable contiene el valor True v talsa si tiene False lista notación es uti¬ 
lizada muy a menudo para comprobar directamente si una variable tiene uno u 
otro valor 

1 n cualquier caso, tanto s¡ la expresión se cumple como si no, la ejecución 
continuará por la siguiente linea de código. I s dei ir. la sentencia Tf utilizada 
de esta forma afecta sido a la linea en la que se lia escrito la in.sli ucción cumple 
ta. pero no a Lis que le siguen. 


Vañae sentencias en una línea 

I n caso de que necesitemos ejecutar varias sentencias si la expresión se 
cumple, en el ejemplo anterior solo se ejecuto una, podemos disponerlas una 
detras de otra separándolos por dos punios. Supongamos que además de darle 
el valor I a Resu 1 Lado también quiera dar el valor Fa 1 se a la misma variable 
implicada en la decisión, l a línea podría quedar como sigue: 

If Variable Then Resultado * 1: Variable False 


I sla nutación, el uso de los dos puntos para escribir varias sentencias en 
una linea, no es exclusiva de las estructuras de control, puede utilizarla en 



cualquier momento, en cualquier linea de código. Sin embargo esta práctica 
hace que el codigo sea menos legible, procediendo de los días en que los pro¬ 
gramas BASIC debían estar distribuidos en lineas numeradas, en cada una de 
las cuales se disponían varias sentencias. 

La salida falsa 

Como se ha dicho, lanío sj la expresión es cierta, v por lo tanto se ejecutan 
las sentencias que hay Iras Then, como si no lo es, la ejecución del programa 
seguirá por la línea de código que corresponda. Por lo tanto habremos conse¬ 
guido que esas sentencias se ejecuten sólo si la expresión es cierta y en ningún 
otro caso. 

En caso de que deseemos que otra sentencia o sentencias se ejecuten sólo si 
la expresión no es cierta podemos ulili/ar la palabra Else, tras la cual dispondre¬ 
mos esa sentencia o sentencias. Por ejemplo, observe este fragmento de código 

Consol e . WriteLint» ( "Se ejecuta siempre (antes)") 

If Variable Then Consolé.WriteLine(“Es cierto") Else _ 

Conso 1e.WriceLine{"Es taiso") 

Consolé.WriteLine("Se ejecuta siempre (después)") 

I a primera linea se ejecutará siempre, la segunda contiene una decisión de 
pendiendo de la cual se ejecuta una sentencia u otra, mientras que la tercera li¬ 
nea se ejecutará en cualquier caso. Fíjese en que si hubiésemos dispuesto la 
llamada Consolé. Wr iteLine ( " Es falso") en la línea siguiente al If, se 
ejecutaría siempre, mientras que tal y como se han estructurado sólo lo hará si 
la expresión es falsa, en ningún caso más 


Nota 

Tenga en cuenta la diferencia entre líneas físicas de código y líneas lógi¬ 
cas. En el fragmento de código anterior sólo hay tres líneas de programa, 
aunque físicamente una de ellas ha tenido que partirse en dos. Observe la 
existencia del carácter _ justo detrás de la palabra Else. Ella indica que 
la línea siguiente es, en realidad, continuación de ésta. 


Condiciones anidadas 

Se puede dar el caso de que la sentencia que sigue a un Then sea otro I f. o 
que la sentencia que sigile «i un Else sea olro I f, y esta circunstancio puede 
repetirse varias veces de tal forma que tengamos uno sene de decisiones ani 
dados. I 7 .n este caso la notación de las sentencias If ... Then ... If . . . 
Then ... Else ... if ... puede ser poco menos que críptico \ puede lie 
var a error, ejecutándose unas instrucciones cuando se deberían ejecutar otras. 
I n este caso es mejor utilizar el segundo lormato de la sentencia I f, mediante 





la cual podemos distribuir el código sujeto a una estructura de decisión en va¬ 
rias lineas El último ejemplo expuesto anteriormente quedaría asi de claro. 

Consolé.WnteLinef "Se ejecuta siempre (antes)”) 

If Variable Then 

Consolé.WriteLine("Es cierto") 

Else 

Consolé.WriteLine( M Es falso") 

End If 

Consolé.WriteLine("Se ejecuta siempre (después)") 

En este caso queda bastante más claro qué líneas se ejecutarán en un caso, 
en otro o en cualquier caso. Todo el código comprendido entre If y End If 
forma parte de la estructura de decisión, mientras que el que queda fuera se 
ejecutara independientemente del resultado de la expresión. Utilizando esta 
nueva notación el código existente en varias decisiones anidadas queda dispues¬ 
to de una forma mucho más clara, como puede ver seguidamente 

Dim A, B, C As Integer 

If A a 1 Then 

If B * 5 Then 

C = A + B 

Else 

C = A - B 

End I f 

Elself A » 3 Then 

C = A • B 

Else 

C = A / B 

End If 

Fíjese cómo la parte que se ejecutará si A=1 contiene otra decisión, con su 
correspondiente If ... End If l a parte falsa, si A no es 1, es también una 
decisión, por lo que se usa la unión Elself para componerla. A la derecha de 
cada asignación se detallan los valores que loman A y B para que se ejecute esa 
línea v no las otras 


Nota 

Si intenta ejecutar este código observará que se produce una excepción. 
Esto se debe a que las variables a y b, dado que no se les ha asignado un 
valor, contienen 0, lo cual causa que se evalúe la expresión c = a / B. 
generando una división por cero. Más adelante, en este mismo capítulo, 
aprenderá a controlar estas excepciones. 


Condiciones que siempre devuelven un valor 

Si t‘ii nuestro código la sentencia condicional tiene como única finalidad 
asignar un valor u otro dependiendo del resultado de la expresión, podemos 



lililí/*ir la Junción II f ( ). I sía toma tres parámetros: la expresión a evaluar, el 
valor a devolver si se cumple v el valor a devolver si no se cumple. Por ojem 
pl»», imagino que desea dar a la variable A el valor 1 o 2, dependiendo de i|ue B 
sea 5. por poner un ejemplo 

Ií B * 5 Then A I Else A - 2 

A tif( B - S, 1,2) 

I n la primera linea ulíli/amos la esiruclura If/Then, mientras que en la 
segunda usamos I vi función llf { ). I n ambos casos el resultado es el mismo. 

I I ejemplo anterior es el i aso mas simple, v a que tan sólo existe una expíe 
siót'i a evaluar v dos valores a dev olver. Pero imagine que «‘I v alor que debe re 
i ibii A depende Je más expresiones, tal v i orno puede ser la siguiente es| ructura 
ile decisión. 

Ií B T 5 Then 

A - 1 

Eiself B ‘ 0 Then 

A * -i 

Eiself B > 5 Then 

A - 0 

End I £ 

luda est.i secuencia di* decisiones puede reducirse a tan sólo una linea por 
medio ile la tuncíón Switch ( ). lista función puede lomar dos o mas parámetros, 
siempre por parejas I I primer elemento de cada pareja es la expresión .1 eva¬ 
luar, mientras que el segundo correspondo al valor a devolver en caso de que 
la expresión sea cierta. 1 a primera expresión que si* cumpla devolverá el valor 
correspondiente. I I codigo anterior quedaría reducido .1 la siguiente linea, ob¬ 
teniéndose exactamente el mismo resultado 

A - Switch(B s, 1 , B • • * 0, -I, B > V, 0) 

I n caso de que las expresiones sean aún mas elementales v se desee simple¬ 
mente dev olver un valor u otro dependiendo de una variable o expresión ulili 
/ada como índice, como puede sor el uiso siguiente: 

If B 1 Then 

A » 5 

Eiself B - 2 Then 

A =* 7 

Eiself B * 3 Then 

A * 1 I 

Endlf 

podemos obviamente simplificar este codigo utilizando Ja tuncíón Switch ( ). 
que quedaría como: 


A * .Switch{ B * 1 , 5, B * 2, 7, B - J, 1 I | 



Pero aun puede quedar mas reduc ido utilizando la función Choose( ) I sla 
toma un primer parámetro que ac tuara como indico y después tantos valores 
como sea necesario, de tal íorma que dependiendo del valor del índice se de¬ 
vuelva un valor u otro. Nuestra expresión original de siete líneas quedaría tan 
simple como puede ver a continuación. 

A - Choose( B, 5, 7, 11 ) 

Al utilizar tanto Switch( ) como Choose( ) tenga en cuenta que si no es 
posible devolver ningún valor, porque no se cumpla ninguna de las expresio¬ 
nes, en el primor caso, o porque el índice sea cero o mayor al número de v«llo¬ 
res existentes, en el segundo, estas funciones devolverán el valor cero. 

Condicionales múltiples 

Memos visto como el uso de las funciones Switch( ) v Choose( ) pueden 
simplificar el código de forma llamativa, pero sólo las podemos utilizar cuan¬ 
do dependiendo de la expresión simplemente devolvamos un valor. Imagine* el 
ultimo ejemplo expuesto, que B pueda lomar los valores 1, 2 o 3, y que depen¬ 
diendo de ello tenga, no que devolver un valor, sino que ejecutar unas u otras 
sentencias. Fn este caso ni $witch( ) ni Choose( ) nos serán útiles v tendría¬ 
mos que utilizar la estructura que vimos al principio de If/Then/Elsel f / 
End Tf. 

Fn casos como éste nos sera muy útil la estructura condicional Select 
Case, que nos permite evaluar una expresión v a continuación enumerar posi¬ 
bles resultados, de tal forma que se ejecute un grupo u otro cíe sentencias de¬ 
pendiendo del resultado que coincida con el obtenido por la expresión. C omo 
ejemplo supongamos que dependiendo del valor de B tengamos que imprimir 
un texto u otro v, ademas, asignar un determinado valor a A 

Select Case B 

Case 0 

Consolé.WriteLine("El valor de B no es valido") 

A = 0 

Case 5 

Consolé.WriteLine("B tiene el valor Optimo") 

A - 10 

Case Is < 5 

Consolé.WriteLine(”B esta por debajo del valor optimo") 

A ■» 3 

Case Is > 5 

Conso l e . Wr i Leí. i ne ( " B está por encima del valor Optimo"! 

A * 7 

End Select 

lii el bloque de código anterior primero se compara sí B os 0. de sor asi se 
imprime un mensaje determinado y se le da a la variable A el valor 0. A con¬ 
tinuación se compara con otra constante, en este caso 5. Fl tercer Case corres¬ 
ponde a la expresión B < 5, os decir, en el caso de que B sea menor que 5 se 



ejecutaran las dos lineas que hay en ese bloque. Por último se ve si B es mayor 
que 5. 

Hn este ejemplo leñemos un oaso por cada bloque. Id mensaje "El valor 
de B no es válido" sólo se imprimirá si B es 0 v no en otro caso. Imagine, 
sin embargo, que esa misma actuación se deba realizar si B es 1 0. Una solución 
seria ulili/ar dos Case, uno con el valor 0 y otro con el valor 10, escribiendo 
en ellos las mismas sentencias. Esto, obviamente, nos llevaría a la repetición de 
un mismo código en distintos sitios. Para evitarlo podemos utilizar dos notacio¬ 
nes distintas, ambas validas, que puede ver en la siguiente porción de código 

Case 0 
Case 10 

Consolé .Wri LeL.ine( "El valor de B no es válido") 

A - 0 


Case 0, 10 

Consolé. Wr i tel.i ne( "El 
A - 0 


valor de B no es válido") 


De igual forma podemos enumerar tres, cuatro o cualquier otro número de 
casos para los que exista una única solución. F.n caso de que varios de estos 
casos sean secuenciales, por ejemplo deseemos ejecutar un cierto codigo si b es 
2,3,4 o 5, en lugar de* utilizar Case 2 , 3 , 4,5 podemos usar la nolac ion Case 
2 To 5. 

I amblen podemos utilizar operadores lógicos en uno de los apartados de 
un Select Case, hecho que nos permite aún una mavor flexibilidad va que si 
tras la sentencia Select Case tan sólo podemos disponer una expresión eva¬ 
lúatele a un segundo valor, después en cada Case es posible componer expre¬ 
siones más complejas Por ejemplo, imagine que desea ejecutar un cierto código 
>i b contiene 3, 4, 5. 6 u 8 v, además, la variable C no es cero 

Select Case B 

Case 3 To 6, tí And C 

Conso le . Wr i Lel.ínet "La condición se cumple") 


Puede darse el caso de que el resultado obtenido de la expresión no coi mi¬ 
da con ninguno de los Case que nosotros hemos dispuesto, caso en el que no 
se ejecutara ningún código existente entre Select Case y End Case <i no ser 
que exista el apartado Case Else. Cualquier codigo que pongamos a conti¬ 
nuación de esta opción se ejecutará siempre* que no se cumpla ninguna de las 
otras condiciones Por ejemplo, en el siguiente fragmento de codigo el mensaje 
"Valor no valido para B" se moslrara ruando B no sea 5, no esté entre 1 
v 4 y no sea mavor que 5, por lo que los casos posibles son que B sea 0 o bien 
negativo. 

Select Case B 
Case 5 

Consol e .Wr i t el.í ne ( "B tiene el valor óptimo") 




A = 10 

Case Is > O And B < 5 

Consolé.WriteLine("B esta pot debajo del valor óptimo") 
A = 3 

Case Is > S 

Consolé.WriteLine("B esta por encima del valor optimo") 
A - 7 

Case Else 

Consolé.Wri t.el,ine( "Valor no válido para B" ) 

A - 0 

End Select 


Estructuras de repetición 


Durante la ejecución de un programa, asumiendo que cuenta con una interfaz 
de usuario, el código que nosotros escribimos se esta repitiendo constantemen¬ 
te. Cada vez que el usuario selecciona una opción, pulsa un bolón, usa el tecla¬ 
do, etc , el mismo código es ejecutado para responder a los mismos eventos, 
b’sta repetición se efectúa a demanda del usuario, cuando es necesario, pero en 
ocasiones es necesario repetir las mismas líneas de código un número determi¬ 
nado de veces seguidas. Obviamente no vamos a escribir múltiples veces el 
mismo código, sino que crearemos un bucle sirviéndonos de algunas de las 
sentencias con que cuenta Visual Basic para ello. 

Bucles por contador 

F.l tipo de bucle más conocido en BASIC es el formado por las instrucciones 
For/Next. La primera pone en marcha el bucle, inicializando una variable con 
un valor de origen, lijando un valor de fin v opcionalmente un incremento en 
cada vuelta del bucle Next marca el final de la sección de código que se desea 
repetir A este bucle se le Mama bucle por contador porque utiliza una variable 
numérica a la que se va sumando o restando un valor en cada vuelta del bucle, 
i uando el contenido de la variable llega a un limite el bucle se lermina. Supon¬ 
ga que desea imprimir en el formulario los números 10 a 20 ambos incluidos, 
bastará con el siguiente bucle. 

Dini Numero As Byte 

For Numero * 10 To 20 

Conso Le . Wr i r el.i ne ( Numero ) 

Next 

Ln este caso nosotros no hemos especificado ningún tipo de incremento, 
por lo que se ha asumido que había que ir sumando uno a la variable en cada 
vuelta, bste incremento puede ser modificado utilizando Step seguido del va¬ 
lor, que puede ser positivo, negativo e im luso cero, caso éste en que al no su¬ 
mársele ningún valor a la variable el huele puede ser un bucle sin fin, a no ser 
que desde el interior el valor de la variable se modilique por algún proceso 



Por ejemplo, suponga que desea imprimir los números pares del 10 al 2 0, el 
código necesario seria el que se muestra a continuación. 

Dim Numero As Byte 

For Numero = 10 To 20 Step 2 
Con so I e . Wri tel.ine( Número) 

Next 

Como verá, la instrucción Next no lleva ningún parámetro, aunque opcio- 
nalmente es posible poner a continuación el nombre de la variable que se esta 
utilizando como contador del bucle. Si se usa cualquier otro identificador ob¬ 
tendremos un error. Habitualmenle no se pone el nombre de la variable tras 
Next a no ser que creemos varios bucles anidados unos dentro de otros, caso 
este en que el nombre de la variable aclara que bucle es el que se termina. 

Un bucle que está programado para ejecutarse un numero determinado de 
veces no tiene por qué completar siempre su ejecución, puede darse el caso de 
que en el interior del bucle exista un proceso por el que en un momento deter¬ 
minado interese darlo por terminado. Para ello disponemos de la sentencia 
Exit For, que provocará la salida inmediata del bucle, En el siguiente fragmen¬ 
to de código se evalúa una expresión en el interior de un bucle, cuando ésta sea 
verdadera se provocará la salida. 

Dim Numero As Byte 

For Número ■■ 10 To 2 0 Step 2 
If Número «• 16 Then Exit For 
Conso Le.Writel.ine(Numero) 

Next 

Bucles condicionales 


Un bucle no siempre es tan simple como para estar controlado por un conta¬ 
dor, a veces no es posible saber de antemano el número de veces que el código 
se debe de ejecutar. En estos casos utilizaremos los bucles condicionales, que 
nos permiten repetir la ejecución de una porción de código mientra s una cierta 
condición sea cierta o hasta que una cierta condición sea cierta 

l a estructura Do While condición/Loop nos permite realizar un bucle 
que se repetirá mientras la condición especificada sea cierta, o dicho de otra 
forma, el bucle se terminará cuando la condición sea falsa. Por ejemplo, supon¬ 
ga que necesita pedir un dato que no puede ser una cadena vacia, obligatoria¬ 
mente debe tener al menos un carácter. El siguiente fragmento de código hace 
precisamente eso, presentar continuamente un mensaje de saludo y mientras el 
usuario no conteste con algo el proceso se repetirá una y otra vez. 

Dim Saludo As String 

Do While Saludo » '* M 

Consolé.WriteLine("Hola, ¿qué tal?") 

Saludo * Consolé.ReadLine() 

Loop 

Console.WriteLine(Saludo) 



En es Ir caso la variable Saludo se acaba de declarar, por lo que su valor 
inicial es la cadena vacía. Eso significa que al entrar en el bucle la condición ini- 
cialmenle es cierta. Pero suponga que. antes de entrar en el bucle, Saludo va 
tiene algún v alor. El bucle no llegará a ejecutarse ninguna ve/, puede probarlo 
simplemente añadiendo la línea Saludo = "Hola" justo después de la decla¬ 
ración. En los casos en que interese que el bucle se ejecute al menos una ve/, 
aunque la condición no sea cierta en principio, bastará con desplazar la condi¬ 
ción a la parle final del código, pasando asi de un bucle en el que la evaluación 
de la expresión se efectúa a la entrada, a otro en el que la expresión se ev alúa a 
la salida. El huele quedaría como se muestra a continuación. 

DO 

Console.WriueLine("Hola, ¿que tal? M ) 

Saludo “ Consolé.ReadLiue( ) 

Loop While Saludo ® *** 

Si en los anteriores bucles cambiamos la palabra While por Until, indis¬ 
tintamente de que la evaluación se efectúe a la entrada o a la salida del bucle, 
conseguiremos negar la condición, de tal forma que el bucle ahora no se ejecu¬ 
taría mientras la condición fuese cierta, si no que lo liaría mientras fuese falsa. 
Por ejemplo, suponga que desea crear un bm le en el que se vayan solicitando 
datos hasta que el usuario introduzca la cadena Fin, momento en que se Jara 
por terminado el proceso. El bucle que necesitamos es el que se muestra en el 
siguiente íragmento. 

Do Untii Saludo = "Fin" 

Conso le . Wr 11 eLine ( " lio la , ¿que tal?**) 

Saludo * Conao 1 e. Readl. i ne ( ) 

Loop 

Todas las expresiones que se han mostrado en los ejemplos son simples, 
comprobando solo una relación entre dos operandos. Por supuesto podemos 
utilizar expresiones mas complejas en las que se vean envueltos operadores lo¬ 
gices, relaciónales y aritméticos 

De igual forma que era posible terminar un bucle por contador desde el in¬ 
terior del propio bucle, con Exit For. para los bucles por condición dispo¬ 
nemos de la sentencia Exit Do, que dará por finalizado el bucle pasando la 
ejecución a la siguiente linea de eódigo posterior al Loop. 

Bucles que recorren un arreglo 

A menudo cuando utilicemos un bucle será para trabajar sobre los elemen¬ 
tos de un arreglo, asignándole un valor, realizando cálculos, etc. El siguiente 
fragmento de código, por ejemplo, crea un arreglo de cadenas y pide valores 
para cada elemento. 


Dim Cadenas(9) As String 
Dim I As Integer 



For 1 * 0 To 9 

Consolé. Wril.eJ.ine [ "Texto para el elemento (0): ", 1 ) 

Cadenas(T) - Consolé.ReadLrne() 

Next 

Aquí Cadenas(I) representa a cada uno Je los elementos Jcl arreglo, va 
que 1 irá recorriendo los índices existentes, en este uso desde el 0 hasta el L ). A 
continuación podrid imprimir coda uno de los valores que se han introducido, 
con un huele del mismo tipo. I umbien podemos utilizar el huele For Each . . 
In, cuya finalidad es recorrer todos los elementos de un arreglo o una colee 
don. sin necesidad de indicarle índices ni valores mínimos o máximos. I ñire 
las palabras Each e In deberemos insertar una variable, habitualmente de tipo 
Object, que irá tomando el valor de cada uno de los elementos que existan en 
el arreglo, ejecutando el bucle por cada uno de ellos. Para imprimir el contení 
do del arreglo el código necesario seria el siguiente. I n el la variable Elemen¬ 
to tomaría el valor de Cadenas (0) y si* ejecutaría el bucle, a continuación el 
valor de Cadenas ( 1 ) y se repetiría el proceso hasta llegar al ultimo elemento. 

Dim Cadena As String 

For Each Cadena In Cadenas 
Consolé.WriteLine(Cadena ) 

Next 


Nota 

En realidad, podemos usar la construcción For Each/Next con cualquier 
tipo de dato que implemente la interfaz System.iEnumerable, no sólo 
con colecciones y arreglos. En un capítulo posterior conocerá las interfaces, 
su implementación y uso. 


Utilizar este tipo de bucle en lugar de un bucle por contador tiene algunas 
ventajas. Una de ellas es que si después del diseño original del programa este 
se modifica v el número de elementos del arreglo se reduce o si* amplia, en un 
bucle por contador habría que retocar los índices, mientras que un bucle For 
Each esto no seria necesario va que se recorren los elementos que existan en 
ese momento. 


Control estructurado de excepciones 


Visual Basic era, hasta ahora, uno de los pocos lenguajes que carecían di* los 
elementos necesarios para controlar excepciones de una torma estructurada, 
sin necesidad de estar comprobando códigos de retorno de error <» saltando de 
un punto a otro del programa. Visual Basic .NFT introduce como otra novedad 
el control estructurado de excepciones, una novedad que nos permitirá susti¬ 
tuir el acostumbrado On Error Goto por otra construcción mas flexible. 





La estructura general para controlar una posible, o posibles, excepción es la 
siguiente: 

Try 

Catch TipoExcepcion 

Catch TipoExcepcion 

Final1y 

End Try 

Las sentencias que aparecen después de la palabra Try son las que, poten¬ 
cialmente, podrían causar una excepción durante la ejecución del programa. Se 
ejecutaran normalmente a menos que aparezca dicha excepción, caso en el cual 
se transferirá el control a las sentencias del Catch apropiado, dependiendo del 
tipo de excepción Por ultimo, las sentencias que hay tras la palabra Finally 
se ejecutaran siempre, indistintamente de que se produzca o no una excepción. 
Este apartado, que es opcional, es usado generalmente para liberar algún tipo 
de recurso. 

Observe el código siguiente, en el se genera una excepción al dividir un nu¬ 
mero por cero. La excepción es capturada y se traduce en la salida de un men¬ 
saje Si no hubiésemos utilizado Try/Catch la excepción detendría la ejecución 
del programa comunicando el error. 

Dim Cociente, Divisor As Integer 

Try 

Cociente - 25 \ Divisor 

Catch 

Consolé.WriteLine ( 

"Se ha producido una división por cero") 

End Try 

La sentencia que hay tras la palabra Catch se ejecutará siempre que se ge¬ 
nere una excepción en algunas de las líneas que siguen a Try, en este caso sólo 
una. Si nos pusiésemos en un caso algo más complejo, en el que las sentencias 
a controlar pudieran generar distintas excepciones, podríamos usar una varian¬ 
te de Catch para efectuar un filtrado, lomemos como base el fragmento de có¬ 
digo mostrado a continuación. 


Dim Cociente As Byte 

Dim Dividendo, Divisor As Integer 


Try 


.Su,-. , f xt . * iij' 'i 

Consolé.WriteLine("Introduzca el dividendo: 


) 


Dividendo = CInt (Consolé.ReadLine{)) 
Console.WriteLine("Introduzca el divisor: ") 



Divisor CInt(Consolé.ReadLine()) 


Cociente = Dividendo \ Divisor 

Conso 1 e . Wrl t.eT.i ne ( "E1 resultado es { 0 ) H f Cociente) 

l .iis excepciones que pueden producirse en este taso son varias, aparte de la 
división por cero. Observe que la variable Cociente es de tipo Byte y no 
Integer, de tal manera que si el resultado de la división es superior a 2 55 se 
produciría un desbordamiento Al convertir el valor solicitado por teclado a 
numero, mediante la función CInt( ), también se podría generar una excep¬ 
ción si dicha conversión fallase. por ejemplo por haber introducido un dato no 
numérico. Por último, cabe la posibilidad de que se diera otro tipo de error 
a ritmético. 

C ada una de las excepciones posibles está representada en la plataforma 
.NlíT por una clase. 

Puede utilizar el Examinador de objetos, como se muestra en la figura b.I. 
para localizar las distintas clases de excepciones, ludas estas clases están den 
vadas de una base común: la dase Exception, que puede ver seleccionada en 
el panel izquierdo de la figura ti. 1. Lín el panel derecho de esa misma figura se 
enumeran los miembros con que cuenta esta clase, algunos de los cuales alojan 
información que puede resultarnos útil. 
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Figura 6.1. Buscamos las clases de excepciones utilizando el Examinador 
de objetos 






Conociendo algunas de las clases de excepciones existentes, al fragmento 
de código anterior podríamos añadirle el siguiente para controlar tres de las ca¬ 
tegorías de excepciones que, según comentábamos antes, podrían producirse. 


Catch X As Di v ideByZeroExcept. ion 
Consolé.WriteLine ( 

"Se ha producido una división por cero") 

Catch X As Overf]owException 
Consolé.WriteLine ( 

"Se ha producido un desbordamiento") 

Catch X As ArithmeticException 
Consolé .Writet. i ne( 

"Se ha producido otro error aritmético”) 

Consolé.WriteLine(X.Messaqe) 

Consolé.WriteLine(X.ToString) 

End Try 

La X que aparece tras cada Catch es una variable de la clase de excepción 
puesta a continuación. F.n lugar de llamarla X podría tener cualquier otro nom¬ 
bre, ya que es un identiticador creado por nosotros 11 control del programa se 
transferirá a uno u otro Catch dependiendo de la excepción que se produzca. 

Si introduce un valor no numérico como dividendo o divisor dara lugar a 
una excepción no controlada, por lo que aparecerá una ventana como la de la 
figura b.2 comunicando el error 
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Figura 6.2. Aviso de una excepción incontrolada 


Procedimientos* y funciones 


I lasta ahora todo el vodigoque liemos necesitado para que nuestros progra¬ 
mas funcionen lo hemos insertado, por regla general, en el método Main( ) 
que existe por defecto en el modulo, porque en realidad se ha tratado de llevar 
a cabo oper.n iones bastante seru illas Sin embargo, cuando el programa tenga 
alguna finalidad más que la simple comprobación o prueba de un control o un 
operador, la cantidad de código necesaria crecerá v en ocasiones necesitare¬ 
mos el mismo código en distintos puntos del programa. Obviamente la solu¬ 
ción no es introducir una v otra Vez todo el código, lauto si se repile romo si 




no. Para evitarlo podemos crear nuestros propios procedimientos \ funciones, 
introduciendo en ellos eJ código que después podrá ser utilizado con una sim¬ 
ple llamada. 

l a única diferencia existente entre un procedimiento y una función es que el 
primero no puede devolver parámetro alguno, mientras que la segunda si. Por 
lo tanto, si vamos a codificar un proceso que realiza una determinada acción 
pero no dev uelve valor alguno lo definiremos como un procedimiento, pero si 
es necesario devolver un valor cualquiera lo definiremos como función. Salvo 
que se indique lo contrario, todo loquea continuación se aplique a un procedí 
miento se aplicará asimismo a una función. La denominación mctiuio se aplica a 
procedimientos v funciones que forman parte de una clase. Wr iteLine ( ). por 
ejemplo, es un método de la clase Consolé. 

Declaración de un procedimiento 

Básicamente, podemos croar un procedimiento en el interior de un modulo, 
como miembro de una estructura o como parte de una clase. Fsa clase puede 
ser, por ejemplo, un formulario Windows, un componente o un servicio Web. 
Los procedimientos, al igual que las variables, pueden ser públicos o privados, 
según puedan ser utilizados sólo desdo el módulo en que se han definido o 
desde cualquier otro módulo de la aplicación Por detecto los procedimientos 
son públicos, poi lo que no es necesario usar ningún modificador si es esa la vi¬ 
sibilidad que deseamos, fn caso contrario podemos usar Private, Protected 
o Friend 


Nota 

Profundizaremos sobre los ámbitos o visibilidad de los métodos, analizan¬ 
do el uso de modificadores tales como Private, Protected, Public y 
Friend. en el capítulo dedicado al estudio de la programación orientada 
a objetos. 


Sabemos que todas las variables que declaremos en el interior de un procedi¬ 
miento serán variables locales, cuva vida comienza al entraren el procedimien¬ 
to v termina al salir de él, pcrdiendo.se por lo lauto el v alor que contenga. Para 
evitar esta pérdida podíamos crear variables estáticas, tal v como vimos en un 
capitulo previo. 

I os nombres de los procedimientos, que deberemos poner tras la palabra 
Sub, siguen las mismas reglas que los de variables, estructuras, clases e interfa¬ 
ces. pudiendo estar formados por letras, números v caracteres de subrayado- 

Recepción de parámetros 

Muchos de los procedimientos que diseñemos en nuestros programas esta¬ 
rán destinados a realizar algún tipo de operación, generalmente partiendo de 




dalos que se I,inlitan en el momento de la llamada. Fstos parámetros deben es¬ 
tar enumerados entre los paréntesis que siguen al nombre del procedimiento, 
indicando su nombre y su tipo. Por ejemplo, suponga que va a crear un proce¬ 
dimiento aiVii finalidad es colocar un texto en unas coordenadas específicas, 
por lo que necesita recibir tres parámetros: la cadena de texto v dos enteros 
con las coordenadas La definición podría quedar como. 

Public Sub Imprimaf ByVal Cadena As string, ByVal X As Integer, 

ByVal Y As Integer) 


End Sub 

De igual forma que liemos trabajado con cadenas v enteros, es posible pasar 
parámetros prácticamente de cualquier tipo, desde estos tipos básicos hasta 
objetos, arreglos e incluso tipos definidos por nosotros. 

Si se pasa como parámetro un arreglo, no importa de que tipo, en la decla¬ 
ración pondremos Iras el nombre de la variable unos paréntesis vacíos, loque 
nos permitirá recibir cualquier número de elementos sin conocerlo de antema¬ 
no. I I código que envía el arreglo como parametro usara solo el nombre de la 
variable, sin paréntesis v sin índices l’or ejemplo, en el siguiente fragmento '-le 
código puede ver un procedimiento que recibe un arregle» ele cadenas, obtiene 
sus limites, inferior v superior, e imprime cada uno de los elementos, 

Prívate Sub MuestraE leme ritos ( By Va 1 Nombt t-s ( ) As String) 

Dim 1 As Integer 

For I - Nombres.GetLowerBound(0) To Nombres.GetUpperBound( 0 ) 

Consol e. Wr i \ eT. i ne( Nombi es { i ) j 

Next 

End Sub 

F.n cualquier punto en el que tengamos un arreglo de cadenas, \ necesite 
mos imprimirlo, no tenemos mas que llamar a MuestraBlementos( ) pasan 
do como parámetro el nombre del arreglo Por ejemplo, estas lineas de código 
imciali/an una matriz con una serie de caden. is y después llaman al procedimien¬ 
to anterior para imprimirlas 

Dim X() As String { 

"Uno". "Dos", "Tres", "Cuatro", "Cinco", "Seis") 

Muest raE1ementos(X) 

Devolución de valoree 

I n comí Je que nuestro procedimiento deba devolver cualquier valor al co 
digo que lo llamo, entonces tendremos que definirlo como una lunción. I sta 
puede sei tanto privada como publica \’ toma los parámetros de igual modo 
que un procedimiento. I ras el cierre' de paréntesis, sin embargo, tendremos 
que añadir la palabra As v el tipo de dalo que devolverá la luncion, aparte de 
cambiar la palabra Sub por Funct ion. l\»r ejemplo, supongamos que \ amos a 



escribir una Iunción que devuelva la suma de los cuadrados de dos números, 
devolviendo un Long con el resollado. La cabecera de la función sería la si¬ 
guiente: 

Private Function SumaCuadrados( 

ByVal NI As Integer, ByVal N2 As Integer) As Long 

Una ve/ que nuestra función haya realizado las operaciones pertinentes y 
disponga del resultado, para devolverlo solamente ha de utilizar la sentencia 
Return disponiendo el valor detrás. Nuestra función SumaCuadr ados ( ) po¬ 
dría quedar como se muestra a continuación. 

Prívate Function SumaCuadrados(ByVal NI As Integer, 

ByVal N2 As Integer) As Long 

If NI * 0 OrElse N2 * 0 Then 
Return -1 

Else 

Return NI * NI + N2 * N2 

End If 

End Function 

Aquí puede ver cómo la función devuelve el valor -1 si cualquiera de los 
parámetros es 0 o el resultado de la operación. Ksle nunca podría ser 1, ya que 
el cuadrado de un número, aunque sea negativo, siempre es positivo y la suma 
de dos números positivos no puede ser negativa. Puede comprobar su funcio¬ 
namiento con una simple sentencia como Consolé . Wr iteLine ( SumaCua¬ 
drados (2,5) ). 

Devolución de arreqloe 

En caso de que una función deba devolver un arreglo, la notación a usar es 
similar a la utilizada para indicar que un parámetro a recibir es un arreglo. F.s 
decir, dispondremos detrás del tipo unos paréntesis vacíos, sin especificar el 
número de elementos. 

I a posibilidad de devolver un arreglo desde una función es bastante intere¬ 
sante, ya que se pueden facilitar tareas que de otra forma serian bastante mas 
complejas. Existe una función que devuelve un arreglo: Split( ). Esta toma 
una cadena de caracteres y genera un arreglo de tipo String, asignando a ca¬ 
da elemento una porción de la cadena original delimitada por un cierto sepa¬ 
rador. 1.a función Split ( ), sin embargo, no es útil si precisamos, por ejemplo, 
crear un arreglo Integer a partir de una serie de datos independientes 

Sabiendo que cualquier función propia puede devolver arreglos, codificar 
un método que permita generar uno a partir de una serie de números facilita¬ 
dos como parámetros no parece demasiado complejo. Los datos de entrada 
pueden recibirse como un ParamArray, algo sobre lo que volveremos en un 
momento. En el interior de la función simplemente creamos un arreglo con el 
numero de elementos adecuado y copiamos los parámetros en sus elementos, 
devolviéndolo como resultado. 



Prívate Function ArregloEnteros( 

ByVal ParamArray F.leinentosf ) ) As Integer() 

Dim Tndice As Integer, Arreglo() As Integer 

’ rf.. •* •» • <» . * r ' 

ReDim Arreglo(El ementes.GetUpperBound(0)) 

For Tndice * LBound(Elementos ) To UBound ( Elementos ) 

Arreglo [ Indice) “ Elementos(Indice) 

Next 

Return Arreglo 

End Function 

Disponiendo de la función ArregloEnteros ( ), croar un arreglo on cual¬ 
quier punto donde se precise seria tan sencillo como escribir dos sentencias 
Kn el fragmento siguiente además se recorre el arreglo para mostrar los valores 
de sus elementos a efectos de comprobación. 

Dim MiArreqlo() As Integer 

Dim Elemento As Integer 

MiArreglo - ArregloEnleros<1 , 5, 12, 3) 

For Each Elemento In MiArreglo 
Consolé.WriteLine(Elemento) 

Next 

Parámetros por valor y por referencia 

Cuando llamamos a un procedimiento y pasamos como parámetro una va¬ 
riable, no una constante, esta se puede recibir por referencia o por valor. Kn el 
primer caso el procedimiento lo que recibe es una referencia a la misma variable 
que se pasa como parámetro, o lo que es lo mismo, recibe la propia variable. 
Ksto significa que si el procedimiento realiza cualquier modificación la varia¬ 
ble original se vera entonces afectada, lo que en algunas ocasiones puede ser 
útil v en otras un problema. Kn caso de que una variable se reciba por valor lo 
que el procedimiento obtiene es una copia del contenido de la variable, pero no 
la variable original, por lo que cualquier modificación que se efectúe no altera¬ 
ra su valor 

Kn Visual Basic b, v versiones previas, por detecto los parámetros se pasa¬ 
ban por reterencia. Ksto significa que. de no indicarse lo contrario de manera 
explícita, se asumía el uso de ByRef. Kn Visual Basic .NKT, por el contrario, no 
hav un modo implícito y siempre debe utilizarse ByVal o ByRef De no introdu¬ 
cirlo nosotros mismos de manera manual, el editor automáticamente añadirá 
ByVal delante de cada parámetro. Esto significa que ahora el modo por delec¬ 
to es por valor v no por reterencia, lo cual tiene ventajas. 

Supongamos que hemos escrito una función cuya finalidad es devolver la 
raí/ cuarta del número que se pase como parámetro, como podría ser la siguien¬ 
te. v que desde un punto del programa se utiliza con una variable que va a ser 



posteriormente utilizada para otros fines. Como puede ver, la función Raiz- 
Cuarta ( ) utiliza el propio parámetro, del que recibe una referencia, para rea¬ 
lizar una operación intermedia y, dado que la referencia apunta a la variable 
Número original, ésta se habrá visto afectada, por lo que o 1 imprimirla no apa¬ 
recerá el valor 62 5, sino 2 5. 

Dira Numero As Integer 

Numero « 62D 

Consol e. Wr i te!, me ( " La raíz cuarta es {0},el número original {1) M , _ 
RaizCuarta(Numero), Numero) 

Public Function RaizCuarta (ByRef Operando As Integer) As Integer 

Operando - Math.Sqrt{Operando) 

Return MaLh.Sqrt{Operando) 

End Function 


Nota 

La funciónSqrt ( ) de la claseMath devuelve la raíz cuadrada del dato que 
se entrega como parámetro. Al hallar dos veces la raíz cuadrada de un nú¬ 
mero lo que se obtiene es la raíz cuarta. 


Para evitar este efecto, indeseado en este caso, basta con indicar en el cuer¬ 
po de la Iunción, antes de la declaración de cada parámetro, que la variable se¬ 
ra recibida por valor. Para ello usaremos ByVal, quedando la función como se 
muestra a continuación. Ahora el valor de la variable Número no se vera afec¬ 
tado en ningún caso por la ejecución de RaizCuarta( ). En realidad, en Vi¬ 
sual Basic .NET, basta con no indicar ni ByVal ni ByRef para usar el primero. 

Public Function Ra i zCuarta( ByVal Operando As Integer) As Integer 

Operando * Math.Sqrt<Operando) 

Return Math.Sqrt(Operando) 

End Function 

A diferencia de lo expuesto con este ejemplo, en otros casos el hecho de que 
el procedimiento que recibe los parámetros pueda modificarlos, lodos, algu¬ 
nos o sólo uno, puede ser de interés, va que, por ejemplo, permitiría devolver 
mas de un valor desde una función. Para indicar que un parámetro se pasa por 
referencia y no por valor debemos utilizar ByRef. según acabamos de ver, en 
sustitución de ByVal. 

Parámetros opcionales 

Al utilizar un procedimiento o una función es necesario facilitarle tantos 
parámetros como se hayan especificado en la declaración, en caso contrario ob¬ 
tendremos un error cuando intentemos ejecutarlo. Esto es asi porque ios pará¬ 
metros, por defecto, no son opcionales, sino obligatorios. En caso de que uno o 






varios de los parámetros sean necesarios unas veces v otras no, lo que haremos 
sera declararlos como opcionales. 

Para indicar que un cierto parámetro es opcional pondremos delante de su 
nombre, y delante de ByVal o ByRef si es que existen, la palabra Optional. 
Si existe un solo parámetro opcional este habrá de situarse en el ultimo lugar, a 
partir de la declaración de un parámetro opcional todos los siguientes deben 
ser obligatoriamente opcionales. Es lógico, si tenemos un procedimiento con 
tres parámetros y resulta que el segundo es opcional y el tercero no. ¿cómo sa¬ 
brá Visual Basic cuando se faciliten dos parámetros si el segundo corresponde 
al parámetro opcional o bien al tercero porque el segundo se lia omitido? 

Fn versiones previas de Visual Basic 4.0 cualquier parámetro opcional de¬ 
bía ser de tipo Variant, pero a partir de la versión 5 se permite que dichos pa¬ 
rámetros tengan tipo como cualquiera otros. Un cambio en Visual Basic .NHT 
es que todos los parámetros opcionales han de tener, obligatoriamente, un va¬ 
lor por delecto. F.ste se facilita en la propia lista de parámetros. 

La siguiente linea, por ejemplo, definiría un procedimiento que recibe dos 
parámetros: el primero de tipoString y el segundo, opcional, de lípo Boolean 

Public Sub Mués t raCadenaíByVal Cadena As String, 

Optional ByVal Convertir As Boolean = False) 

Cuando un procedimiento tiene, como en este caso, parametros que son op¬ 
cionales. hay que asumir que al ser invocados es posible que dichos parámetros 
no sean facilitados. En este caso dichos parámetros tendrán su valor por defec¬ 
to, False en este caso. Continuando con el ejemplo del procedimiento Mues- 
traCadena ( ), supongamos que su finalidad es mostrar la cadena que se pasa 
como primer parámetro y, en caso de como segundo parámetro se facilite el 
valor True debe convertirla antes en mayúsculas. El procedimiento completo 
quedaría como se muestra a continuación. 

Public Sub MuésLraCadena{ByVal Cadena As String, 

Optional ByVal Convertir As Boolean = False) 

If Not Convertir Then 

Consolé.Wr i teLíne(Cadena) 

El se » »- : I - r r- • 

Console.WriteLine(Cadena.ToUpper ( )) 

End If 

End Sub 

Al procedimiento anterior se le podría llamar de distintas formas, siempre 
que exista al menos un parámetro v ésto sea de tipo String. Por lo tanto, las 
siguientes serian llamadas válidas al procedimiento Mués traCadena ( ). 

Dira Saludo As String = "Hola, ¿qué tal?” 

MuéstraCadena(Saludo) 

MuestiraCadena (Saludo, True) 

MuestraCadena(Sa1udo, False) 



Si necesitamos disponer de un número indeterminado de parámetros opcio¬ 
nales en nuestro procedimiento, en lugar de utilizar Optional para definir 
una serie de variables sin conocer a ciencia cierta cuántas serán necesarias, po¬ 
demos usar la clausula ParamArray. que nos permite definir como opcional 
una lista de parámetros en la que podremos recibir cualquier numero de paráme¬ 
tros de cualquier tipo. Solo podemos tener un ParamArray en la lista de pará¬ 
metros de un procedimiento y, en caso de existir, no puede declararse ningún 
otro parámetro opcional. 

Por ejemplo, el siguiente procedimiento puede recibir un numero indetermi¬ 
nado de parámetros v además de cualquier tipo. 

Public Sub MuéstraCadeuas| ByVal ParamArray Cadena()> 

Dim Elemento As Object 
For Each Elemento in Cadena 

Consol e . Wr i t.eT. i ríe ( " { 0 } -> {!}", _ 

E1emento.GetType.ToString(), Elemento) 

Next 

End Sub 

Una llamada válida a osle procedimiento podría ser la que se muestra mas 
abajo. Al ejecutar el programa obtendríamos el tipo de cada uno de los parame 
tros v su contenido, como se aprecia en la Hgura 6.3. 

MuestiaCadenas { 1 , "Hola”, True, Now, 166.386) 


ss F:\DatosTrabajo\Libros\Actuale5\PBVIsualBaslcNET\Ejemplos\... -M*l 


¡ystan. Itic32 -> 1 
¡yftt«n.$tflnq -> Huí* 

¡yxtun.BoolffAft -> Tmih 

¡yatan.DatrI ínn > t5' , 12'’2»Hl 12:40:1* 

¡yttan.brtiiMe -> 1 * 6 . 381 ; 


Figura 6.3. Tipos y valores de la lista de parámetros variable 

Salida de un procedimiento 

I lasta ahora nuestros procedí míenlos se han ejecutado desde principio a 
fin, terminando al llegar a la linea End Sub que provoca que el control \ uelva 
a la sentencia siguiente a la que provocó la llamada. AI igual que ocurría con 
los bucles, que en ocasiones era necesario lerminarlos antes de tiempo, dispo¬ 
nemos de unas sentencias que nos permitirán finalizar la e|ecucmn ele* un pro¬ 
cedimiento de forma anticipada. 





l*ara provocar la salida de* un procedimiento usaremos Exit Sub, mientras 
que para realizar la misma operación en una función usaremos Exit Function. 
Generalmente estas sentencias están asociadas a alguna estructura condicio¬ 
nal, ya que si las disponemos directamente como una sentencia ejecutable más 
provocará la salida del procedimiento siempre en el mismo punto, impidiendo 
asi la ejecución del resto del código que exista. 

Procedimientos recursivos 


Ya hemos visto como podemos utilizar un procedimiento v cómo podemos 
llamarlo desde cualquier punto del módulo, si es privado, o desde cualquier 
otro, si es global. F.slas llamadas siempre son externas, desde hiera del procedí 
miento, que es el modo más habitual. Sin embargo un procedimiento puede ser 
llamado desde el interior del código que lo compone, es decir, el procedimien¬ 
to se puede llamar a sí mismo. Cuando ocurre esIo se dice que el procedimien¬ 
to es recursivo. 

Cuando se hace que un procedimiento sea recursivo se está buscando, gene¬ 
ralmente, una turma simple de realizar una cierta operación que de otra lorma 
sería mas compleja I lav que lener en cuenta que cada vez que llamamos a un 
procedimiento, indistintamente del punto desde el que se realice la llamada, 
en la pila se almacena una dirección de retorno, asi como el espacio necesario 
para las variables locales que tenga el procedimiento 

Por lo tanto, un procedimiento recursivo que se llame a si mismo un mime 
ro importante de veces puede provocar un desbordamiento de la pila. Por su 
puesto esto ocurrirá siempre que el procedimiento se llame continuamente, sin 
fin, por eso la llamada de un procedimiento a él mismo siempre dependerá de 
alguna condición. 

Como ejemplo suponga que queremos escribir una función a la que facilitán¬ 
dole un numero nos devuelva su factorial, es decir, ese mismo número N mul¬ 
tiplicado por N-l, N-2 y asi sucesivamente hasta llegar a multiplicar por 1 
Una posible solución seria la función siguiente. 

Public Function FactorialNoRecursivo( ByVal N As Integer) As Integer 
Dira I, Resultado As Integer 
Resultado * 1 
For I ■ 2 To N 

Resultado -* Resultado * 1 

Next 

Return Resultado 

End Function 

Una solución alternativa a ésta es una (unción remisiva, que se llame tantas 
voces como sea necesario pasándose en cada llamada el número entregado me¬ 
nos I I sto es lo que hace la limcinn Factorial ( ), que si prueba verá mino 
obtiene el mismo resultado que la anterior 


Public Function Facloria 1 (ByVal N As Integer) As Integer 
I f N 3 1 Then 



Return 1 
Else 

Return N * FactoriaJ.{N - 1) 

End If 

End Punction 


Llamadas a métodos por nombre 

Cuando so quiere llamar a un método u obtener o modificar una propiedad 
de un determinado objeto, lo habitual es usar el sistema que hemos utilizado 
hasta ahora, consistente en disponer un punto detrás del nombre del objeto se¬ 
guido del nombre del método o propiedad. 

Utilizando este sistema Visual Basie conoce, en el momento de compilar el 
programa, el objeto y el método o propiedad al que se quiere acceder, por lo 
que puede establecer un enlace directo. 

Existe una alternativa a dicho sistema, mucho más flexible aunque más len¬ 
ta, que consiste en utilizar la función CallByName( ). Mediante esta función 
es posible invocar métodos asi como obtener y modificar propiedades sin co¬ 
nocer de antemano cuáles serán, es decir, será al ejecutar el programa cuando 
se resuelva el enlace y se realice la acción solicitada. 

Parámetros al usar CallByName ( ) 

II numero de parámetros que es preciso facilitara la función CallByName ( ) 
es variable, dependiendo do la acción que se vaya a efectuar y los parámetros 
que precise el método al que va a llamarse. Los tres primeros parámetros, no 
obstante, son siempre necesarios. 

En primer lugar hav que indicar a qué objeto pertenece el método o la pro¬ 
piedad sobre la que se va a actuar. 

Si queremos acceder a una propiedad de un botón llamado Commandl, por 
poner un ejemplo, el primer parámetro a entregar a CallByName ( ) seria pre¬ 
cisamente Commandl. 

I lav que tener en cuenta que lo que facililamos es un objeto, no el nombre 
de un objeto, por lo que Commandl no iría entre comillas. 

A continuación tendremos que indicar el nombre del método o propiedad, 
en este caso facilitando una cadena, que puede ser tanto una constante como una 
variable u otra propiedad, siempre v cuando el resultado sea de tipo String. 
Esto permite, por ejemplo, solicitar al usuario de un programa el nombre del 
método que quiere ejecutar. 

El tercer parámetro será una do las constantes enumeradas en la tabla 6.1. 
Con ellas se indica la acción que quiere realizarse, que puede ser una llamada a 
un método, la obtención del valor actual de una propiedad o su modificación. 
Estos valores forman parle de una enumeración, llamada CallType. definida 
en el ámbito Microsof t .VisualBasic, el mismo en el que se encuentra la 
función CallByName ( ). 




Tabla 6.1. Constantes para el tercer parámetro de caHByName( ) 


Constante 

Acción a llevar a cabo 

vbMethod 

Ejecución de un método 

vbGet. 

Lectura del valor de una propiedad 

vbSe t 

Escritura de una propiedad 


En caso de que usemos la función CallByName( ) para llamar a un método 
que no precisa parámetros o para recuperar el valor de una propiedad, sera su¬ 
ficiente con los tres parámetros que se han descrito hasta ahora. Si vamos a mo¬ 
dificar el valor de una propiedad o llamara un método que necesita parámetros, 
sm embargo, deberemos facilitar uno o mas parámetros adicionales. Fl tipo de 
estos parámetros dependerá del tipo de la propiedad a modificar o de los tipos 
que precise el método al que se invoca, en realidad CallByName( ) espera co¬ 
mo cuarto parámetro un arreglo Ob ject. 


Puntos clave 


• En Visual Basic .NE I, como en prácticamente todas las versiones que han 
existido de BASIC, es posible disponer varias sentencias lógicas en una 
sola linea, separándolas con dos puntos. Es una técnica, sin embargo, que 
no contribuye a la claridad del código 

• La sentencia condicional por excelencia es If, tras la cual se dispone una 
expresión que devuelva True o False o un valor que pueda evaluarse 
con uno de esos dos. 

• Los apartados Then y Else dan paso a las listas de sentencias que deben 
ejecutarse en caso de que la expresión sea cierta o falsa, respectivamente. 

• Además de la sentencia If, las funciones llf ( ). Switch( ) o Choose( ) v 
pueden resultarnos útiles en casos concretos para verihcar una o varias 
expresiones. 

• Cuando sabemos efe antemano cuántas veces debe repetirse un bucle uti¬ 
lizamos la sentencia For Next, recurriendo en caso contrario a alguna 
de las variables Do/Loop 

• Mediante la sentencia For Each In se facilita la enumeración de los ele¬ 
mentos de un arreglo o una colección. 

• Aunque podemos seguir ulili/ando la sentencia On Error, como en ver¬ 
siones previas de Visual Basic, en Visual Basic .NLT contamos con un con¬ 
trol estructurado de excepciones, mucho mas flexible y claro, 

• Mediante los procedimientos y funciones se facilita la reutili/.u ion de có¬ 
digo. Un procedimiento es un conjunto de sentencias al que st* asigna un 




nombre que, posteriormente, puede ser utilizado para ejecutarlas cuando 
sea necesario. 

• Los procedimientos pueden tomar una lista de parámetros. Éstos pueden 
facilitarse por valor, que es el modo por detecto, o por referencia: ByVal 
yByRef. 

• Cuando es necesario devolver un valor se escribe una función en lugar de 
un procedimiento, utilizando la sentencia Return para devolver el resul¬ 
tado. 

• I os tipos de los parámetros de entrada y salida pueden ser cualquiera de 
los que hemos conocido en capítulos previos. 

• Ls posible invocar a un método, leer o asignar una propiedad mediante la 
fundón CallByNamet ) 

Resumen 


I al y como ha podido ver en este capítulo. Visual Basic .NK I es un lenguaje 
rico en estructuras de control condicionales, de repetición y estructuración del 
código en procedimientos y funciones, l odos estos elementos resultaran indis¬ 
pensables en cualquier aplicación que necesitemos desarrollar, independiente¬ 
mente de su finalidad, yaque son fundamentales. F.l nuevo control estructurado 
de excepciones es un paso más en la evolución de Visual Basic, equiparándose 
en este aspecto, la gestión de errores, a los lenguajes de programación más mo¬ 
dernos 

Ln el capitulo siguiente seguiremos avanzando en el conocimiento del len¬ 
guaje. aprendiendo a definir nuestras propias clases de objetos y ámbitos, co¬ 
dificando métodos, que no son mas que procedimientos pertenecientes a una 
clase, v utilizando estos objetos desde nuestras propias aplicaciones. 
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Programación 
orientada 
a objetos 


Visual Basic .NI I es la primera versión Je Visual Basu verdaderamente 
orientada a objetos. Aunque en versiones previas era posible crear clases en 
unos módulos espeulicos, realmente se trata Je un mecanismo dependiente de 
(. OM v, ademas, no se contaba con capacidades fundamentales como la heren¬ 
cia. Fn Visual Basic NI I . por el contrario, las clases son construcciones de pri¬ 
mer nivel equiparables a las ele C++, |ava o C 0. 

Nuestro objetivo, en este capitulo, es aprender a del inir nuestras propias 
clases, utilizándolas posteriormente para crear objetos t ambién estudiaremos 
algunos tem.is que guardan cierta relación con la programación orientada a 
objetos o bien los elementos que puede contener una clase. Algunos de ellos 
son los ámbitos con nombre, las intertaces o la sobrecarga de métodos. 

/ 

Ambitos con nombre 

I as aplicaciones actuales son bastante más complejas que las que podían 
desarrollarse hace unos años sobre DOS o las primeras versiones de Windows. 
In una aplicar ion partir i pan ahora un buen numero de componentes mediante 
los cuales se tacilita el acceso a bases de datos, la loncctividad en redes, comu¬ 
nicación con otras aplicaciones, etc. I a existencia ríe tantos componentes puede 







causar conflictos si hay coincidencias de nomenclatura y, por ello, el modelo 
de componentes mas usado hasta ahora, COM (Compoucnt Objccl Model), intro¬ 
dujo los conocidos como CdJID (Ghbalty UnUjuc I Den ti fu y). Estos identificadores 
son secuencias en 12K bits, o Ib bytes, teóricamente irrepetibles. 

Trabajar con CiUIDs siempre ha sido farragoso, siendo necesario el uso de 
archivos de cabecera donde estaban predefinidos o servicios que se encarga¬ 
ban de traducir nombres descriptivos en identificadores únicos, aunque esto 
no era posible en todos los casos. Fn la plataforma .NFT se ha optado por una 
solución radicalmente distinta: el uso de espacios o ámbitos con nombre. 

Un ámbito con nombre, del inglés íiiifnrtpnce, es un ámbito delimitado explíci¬ 
tamente al que se ha asignado un idcntificador. En el interior de un ámbito con 
nombre es posible incluir tanto definiciones de tipos como otros ámbitos con 
nombre, creando una anidación que dará lugar a una jerarquía. 

Fn la figura 7.1 se ha representado gráficamente el ámbito con nombre 
System v algunos de los ámbitos que hay en su interior, como Windows y Web. 
Éstos contienen, a su ve/., otros ámbitos de nombres como Services v UI. 


System 

Windows 

Forms | 

Web 

Services | 

UI 

Figura 7.1. Unos ámbitos con nombre contienen otros en su interior 

Definición de ámbitos con nombre 

Para crear un ámbito con nombre, incluyendo en el las definiciones que nos 
interesen, utilizaremos la palabra clave Namespace. I a estructura seria simi¬ 
lar a la siguiente: 

Namespace Nombre 

End Namespace 

Observe que todas las definiciones que se encuentren entre Namespace v 
End Namespace, que abren y cierran el bloque, tan solo existen dentro del es¬ 
pacio con nombre. Islo significa que para hacer referencia a dichas definicio¬ 
nes, por ejemplo para crear un objeto de una cierta clase, habrá que utilizar un 
nombre cualificado. F.s un tema que abordaremos de inmediato. 

C omo se indicaba antes, un ámbito con nombre puede contener otros en su 
interior, creando un anidamiento que daría lugar a una cierta jerarquía I s po- 




sibil* utilizar diferentes sintaxis para incluir un ámbito con nombre en otro. Los 
dos siguientes fragmentos de código tendrían un resultado equivalente: 


Namespace Anaya 

Namespace ProgramacionVBNET 
Class HolaMundo 

Public Shared Sub Main() 

System.Consolé.Wr iteLinef 

“Hola desde Anaya.ProgramacionVBNET") 
End Sub 
End Class 
End Namespace 
End Namespace 


Namespace Anaya.Programad onVBNET 
Class HolaMundo 

Public Shared Sub Main() 

System.Console.WriteLine( 

"Hola desde Anaya.ProgramacionVBNET") 

End Sub 
End Class 
End Namespace 

Kn ambos casos tenemos un ámbito con nombre, llamado Anaya, que con¬ 
tiene en su interior otro, denominado ProgramacionVBNET. Este. finalmente, 
contiene la clase HolaMundo. I I resultado de ejecutar cualquiera de estos dos 
programas es exactamente el mismo: la salida de una cadena de caracteres por 
la consola. La clase HolaMundo no está en un ámbito global, sino en un espacio 
con nombre llamado Anaya. ProgramacionVBNET, de forma similar a como 
la clase Form se encuentra en el espacio con nombre System .Windows . Forms. 


Nota 

Para seguir los ejemplos inicie un nuevo proyecto Visual Basic .NET de tipo 
consola, eligiendo el elemento Aplicación de consola, y sustituya el código 
generado por el asistente por el código del ejemplo. A continuación abra la 
ventana de propiedades y seleccione la clase en la lista Objeto inicial, co¬ 
mo se ha hecho en la figura 7.2. Siga este mismo sistema para los ejemplos 
siguientes, ya que no vamos a usar un módulo, como en capítulos previos, 
sino clases que contienen un método compartido Main( ). 


A la hora de crear nuevos ámbitos con nombre deberemos tratar siempre de 
crear referencias inequívocas. Fn los fragmentos anteriores, por ejemplo, se ha 
usado el nombre de una empresa seguida del nombre de un libro, de tal lorma 
que difícilmente puede encontrarse la referencia Anaya . Programac i onVBNET 
en otra parte. F.n realidad. Anaya. ProgramacionVBNET sería un subámbito 
que existiría en el ámbito de primer nivel, establecido en la ventana mostrada 
en la ligura 7.2. Por deh‘t lo, Visual Basic genera un ámbito con el nombre del 




proyecto, aunque la definición no es visible en forma de ninguna sentencia 
Namespace. Nuestra clase, en este caso concreto, se encontraría en el ámbito 
HolaMundoConsola.Anaya.ProqramacionVBNET. 



Figura 7.2. Establecemos el punto de entrada a la aplicación 


Referencias a un ámbito con nombre 

Suponiendo que la clase HolaMundo que hemos definido luese publica, que 
en este momento no lo es, v deseásemos crear un objeto de dicha clase desde 
otro programa, tendríamos que componer una referencia completa que permilíe¬ 
se al compilador identificarla de manera inequívoca. F.slo significaría antepo¬ 
ner al nombre de la clase el del ámbito o ámbitos con nombre donde se encuentra 
definida, como se hace en esto programa: 

Class UsaHolaMundo 

Sharcd Sub Main() 

Dxm MiHolaMundo As Anaya . ProgramacionVBNET . HolaMundo - 
New Anaya.ProgramacionVBNET. Ho1 aMundo( ) 

System .Consolé.WrltcLi ne (MiHolaMundo.Saludo()) 

End Sub 

End Class 

En este caso Anaya. ProqramacionVBNET es, al igual que System, el identih- 
cador de un ámbito con nombre. HolaMundo, por el contrario, es el identilicador 
de una clase, como lo es Consolé. 

Una alternativa a esta composición de referencias cualificadas consiste en 
utilizar la sentencia Imports, seguida del ámbito cuva referencia no deseamos 
repetir continuamente I I resultado, como puede ver a continuación, es un có¬ 
digo mas legible 





Imports System 

Iroports Anaya.ProgramacíonVBNET 

Class UsaHolaHundo 
Shared Sub Main() 

Dim MiHolaMundo As HolaMundo - New HolaMundo() 

Console.Writer.ine(MiHolaMundo.Saludo( ) ) 

End Sub 
End Class 

Observe que mediante Imports tan sólo puede hacerse referencia a ámbi¬ 
tos con nombre, no a clases, estructuras o cualquier otra definición de tipo No 
es válido, por tanto, intentar lo siguiente. Si compilásemos este código obten¬ 
dríamos el correspondiente error 

Imports System.Consolé 
WriteLinef"Hola" ) 

Conflictos entre ámbitos con nombre 


Utilizar la palabra clave Imports para hacer visible en nuestro ámbito ele¬ 
mentos contenidos en un cierto espacio con nombre, que es lo que hemos he¬ 
cho en el punto anterior, puede dar origen a conflictos v ambigüedades. Tara 
verlo, lo mejor es servirnos de ejemplos reales con código. 

Vamos a partir de un nuevo módulo Visual Basic NFT con el código mostra¬ 
do a continuación. I n él tenemos, como puede verse, un ámbito con nombre 
que tiene en su interior a otros dos. C ada uno de estos define una clase llamada 
HolaMundo Podemos compilar este código, generando una biblioteca de cla¬ 
ses (véase figura 7.ó), sin que se produzca error alguno. Listo es asi porque aun¬ 
que existen dos clases con el mismo nombre, HolaMundo, cada una se encuentra 
en un ámbito distinto. 

Namespace ClasesAnaya 


Namespace ProgramacionVSNET 

Public Class HolaMundo 

Public Function Saludo{) As String 
Return 

"Hola desde el ámbito Programación . Gil i aVSNET" 

End Function 
End Class 
End Namespace 

Namespace ProgramacionVBNET 


Public Class HolaMundo 



Public Function Saludo() As String 
Return _ 

"HoLa desde el ámbito Anaya . Proqramac ionVBNET” 

End Function 
End Class 
End Namespace 

End Namespace 


Nuevo proyecto 
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Figura 7.3. Iniciamos un proyecto Biblioteca de clases para alojar 
nuestro código 


Nota 

Para evitar que el ámbito clasesAnaya esté, a su vez, contenido en un 
ámbito superior definido automáticamente por Visual Basic .NET, abra la 
ventana de propiedades del proyecto y elimine el contenido del apartado 
Espacio de nombres de la raíz. 


Utilizar las clases definidas en el módulo anterior es bastante sencillo, bási¬ 
camente basta con añadir una referencia al provecto en que se necesiten \, por 
supuesto, incluir las respectivas referencias mediante la instrucción Imports 
Inicie un nuevo proyecto añadiéndolo a la solución actual, en lugar de cerrarla, 
de tipo aplicación de consola Abra el menú emergente del provecto, en el Ex¬ 
plorador de soluciones, y seleccione la opción Agregar referencia I n la v enta 
na que aparece, similar a la de la figura 7.4, elija de la página Proyectos la única 
opt ion disponible. Finalmente, introduzca este código en el módulo de la apli¬ 
cación de consola. 


Importa System 

Imports ClasesAnaya.ProgramacionVSNET 
Imports ClasesAnaya.ProqramacíonVBNET 






Module Modulel 


Sub Main() 

I*'- *• .- é ► lt** * • !••*’ .1 “ í «J f • 

Dim MiHolaMundo As HolaMundo = New HolaMundo() 

Consolé.WriteLine(MiHolaMundo.Saludo{)) 

End Sub 

End Module 



Figura 7.4. Añadimos en el proyecto de consola una referencia 
a la librería de clases 


Al intentar compilar este código, como se ha hecho en la figura 7.5, verá que 
obtenemos un error. En el método Main( ) usamos la clase HolaMundo, pero 
resulta que existen dos clases con ese nombre, una en el ámbito de Clases- 
Anaya.ProgramacionVSNET y otra en eldeClasesAnaya.Programacion- 
VBNET. 1.a solución a este problema pasa, lógicamente, por utilizar referencias 
completas como las mostradas en un ejemplo anterior de este mismo capitulo. 


Nota 

En realidad no es necesario llegar a compilar para ver el problema, puesto 
que Visual Basic .NET va efectuando una compilación en segundo plano 
y señalando los puntos donde hay errores a medida que editamos. Basta 
con situar el puntero del ratón sobre la marca, tal como se ha hecho en la 
figura 7.5, para obtener una indicación de cuál es el problema. 


Ya vemos que Id solución es obvia, pero no lo es menos la incomodidad de 
tener que introducir referencias como: 




Dim MiHolaHundo As C1 asesAnaya.programacionVSNET. llolaMundo - 
New CiasesAnaya.ProgramacionVSNET.Ho1aMundo{); 

para poder croar un objeto de una cierta clase A fortunad omento, la sentencio 
Imports nos permite importar el contenido de un ámbito con nombre creando 
un alias, un pseudónimo al que podemos asignar el identificador que nos con¬ 
venga. Fslo es lo que se hace en el ejemplo siguiente. En el puede observar co 
mo so asignan los alias VS v VB a los dos ámbitos con nombre, do tal manera 
que, posteriormente, podemos utilizar dichos alias en lugar de las referencias 
completas. 

Imports System 

Imports VS * CiasesAnaya.ProgramacionVSNET 
Imports VB «■ C LasesAnaya . Programac i onVBNET 

Module Module! 

Sub Mam ( ) 

Dira MiHolaMundo As VB.HolaMundo = _ 

New VB.MolaMundo() 

Conso le.WriteLine{MiHoLaMundo.Sa1 odo( )) 

End Sub 

End Module 



Figura 7.5. En la Lisia de lareas aparecen las indicaciones de error 




Nota 

A la hora de crear Identificadores y construir referencias debe tener en 
cuenta que el lenguaje Visual Basic .NET, a diferencia de otros existentes 
en Visual Studio .NET, no distingue entre mayúsculas y minúsculas. Esto 
significa que si define un ámbitocon nombre, una clase o cualquier otro tipo 
con el nombre vbasic por poner un ejemplo, y utiliza posteriormente el 
nombre VBasic estaría haciendo referencia al mismo elemento, no a dos 
distintos. 


/ 

Ambitos con nombre en Visual E3asic .NET 

Como acabamos do ver, utilizando la palabra clavo Namespace podemos 
definir los ámbitos con nombro que necesitemos, como en cualquier otro de los 
lenguajes .NET. Con Visual Basic .NET, sin embargo, hemos de tener en cuenta 
que cada vez que se inicia un nuevo proyecto automáticamente se crea un ám¬ 
bito para contener sus elementos. Ese ámbito, como va sabe, tiene el nombre 
del provecto y podemos modificarlo desde la ventana de propiedades del pro¬ 
véelo. 

En la practica, por tanto, cada proyecto de Visual Basic NET va tiene im¬ 
plícito un ámbito con nombro que, en la mayoría de los casos, nos será útil tal 
cual, sm necesidad de crear otros de manera explícita. 


Clases de objetos 


En un capitulo previo pudimos conocer los tipos de datos intrínsecos de Vi¬ 
sual Basic .NET, asi como la forma de crear nuevos tipos que almacenan valor; 
enumeraciones v estructuras. Las clases representan otro mecanismo para crear 
nuevos tipos de datos, si bien en este caso las variables contendrían la referen¬ 
cia a los objetos creados a partir de la clase. Las clases, por tanto, se definen, 
igual que definimos una enumeración o una estructura, describiendo los miem¬ 
bros con que contara. Posteriormente, usando la clase como si fuese un tipo, se 
crearían los objetos y accedería a sus miembros 

Lo que diferencia a las clases de cualquier otro tipo de dato, aparte de que 
se utilicen para crear objetos de los cuales se obtiene una referencia, es que pue¬ 
den derivarse unas de otras, posibilidad inexistente en las estructuras, por po¬ 
ner un ejemplo. No leñemos por qué crear una clase partiendo de coro, aunque 
podemos hacerlo. Podríamos croar una clase nueva de formulario partiendo 
de la clase Forra va existente, heredando todas sus características 

Al igual que las estructuras, las clases pueden ¡mplementar interlaces, tema 
que abordaremos en este mismo capitulo, asi como contar entre sus miembros 
con variables de dalos, procedimientos, funciones y propiedades. Ademas tam¬ 
bién pueden incluirse delegados y eventos. Algunos de estos elementos los co¬ 
nocerá no en éste sino en el próximo capitulo. 




Los puntos siguientes introducen las características más importantes relati¬ 
vas a la definición de clases en Visual Basic .NLT, acompañando las explicacio¬ 
nes con algunos ejemplos breves. Para obtener una descripción completamente 
detallada de cada modificador o técnica consulte la referencia del lenguaje Vi¬ 
sual Basii .NHL. 

Definición de una clase 


Ya en los ejemplos previos ha visto, de forma básica, cuál es la definición do 
una clase sencilla. La palabra clave es Class, tras la cual dispondremos el 
identificador de la clase. La lista de miembros iría en las lineas siguientes, has¬ 
ta finalizar la definición con End Class. Tanto la clase como sus miembros 
pueden contar con múltiples modificadores, parte de los cuales va a tener oca¬ 
sión de conocer de inmediato. 

I as clases se definen en el interior de un ámbito con nombre. A diferencia 
de éstos, que son meros contenedores, las clases son estructuras de imple- 
mentación. Las clases se usan para modelar las aplicaciones como si estuvieran 
compuestas de objetos más o menos discretos. Al igual que ocurre con los ám¬ 
bitos, en el interior de una clase es posible definir otras. 

De manera implícita, a menos que indiquemos lo contrario, toda clase está 
derivada del tipo Object que, como va sabe, es la base de todos los tipos de 
datos de Visual Basic .NLT. Lste cuenta con una serie de miembros que, por 
tanto, son heredados por todas las clases que podamos definir. Si nuestra clase 
está derivada de otra heredará, asimismo, todos los miembros de su clase ba¬ 
se v los de las clase base de la base, ascendiendo en la jerarquía hasta llegar a 
Object. 

Visibilidad de una clase y sus miembros 

I as clases, como acaba de decirse, pueden estar incluidas en un ámbito con 
nombre o en otras clases. Su visibilidad, fuera de ese ámbito, dependerá de los 
modificadores que dispongamos delante de la palabra Class en el momento 
de la definición F.stos modificadores pueden también aplicarse a los miembros 
de la clase: métodos, propiedades, variables, etc. Las posibilidades son las si¬ 
guientes: 

• Public - La clase, o el miembro, es visible en todos los ámbitos, no sólo 
en el que se ha definido. Las clases públicas, por ejemplo, pueden utili¬ 
zarse desde ámbitos con nombre externos al propio. Los miembros públi¬ 
cos de una ciase son accesibles, al crear un objeto, desde fuera de la propia 
clase. 

• Proteeted - Lste modificador sólo es aplicable a los miembros de una 
clase, no a la clase en si. 1.a visibilidad está reducida a la propia clase y 
las que pudieran derivarse de ella. Ls decir, un miembro protegido no es 
accesible externamente. 



• Prívate - Fs el ámbito más reducido. Una dase privada sólo puede uti¬ 
lizarse en el interior del ámbito en que se encuentra incluida, va sea un 
nunic<fhKV u otra clase. I os miembros que tienen este modificador, igual¬ 
mente, sólo pueden ser usados desde el interior de la dase donde se han 
definido, nunca desde fuera, ni siquiera en clases derivadas. 

• Friend Es similar a Public. Si bien la dase o el miembro es visible 
desde fuera de su ámbito inmediato, esta regla sólo se aplica dentro del 
ensamblado al que pertenece Una clase Public puede utilizarse desde 
otros ensamblados, mientras que una Friend no. 

• Protected Friend - (orno puede suponer, es una combinación de 
Protected v Friend. El resultado es que los identiticadores pueden 
utilizarse en el ensamblado en que se han definido, así como en clases de¬ 
rivadas a pesar de que se encuentren en otros ensamblados. 

La visibilidad de las clases v sus miembros es algo que debe deducirse di¬ 
rectamente del diseño lógico de la propia aplicación. Normalmente ésta cons¬ 
tara de una serie de clases publicas a partir de las cuales se crearan los objetos 
fundamentales, exponiendo métodos v propiedades que permitan a las aplica¬ 
ciones configurar su funcionamiento. Internamente, estas clases pueden utili 
zar otras no visibles desde el exterior, asi como miembros privados y protegidos. 

Clases derivadas y herencia 

Uno de los mecanismos más interesantes de los lenguajes orientados a obje¬ 
tos, categoría en la que cae Visual Basic .NF.T. es el de herencia. Gracias a el, es 
posible definir una nueva clase partiendo de otra existente, de tal forma que la 
derivada hereda de la base todos sus miembros, lo cual implica contar, va de¬ 
partida, con la misma funcionalidad. La clase derivada puede acceder a todos 
los miembros de la base exceptuando aquellos que son privados. 

Mediante el mecanismo de herencia se contribuye a la reutilización del có¬ 
digo, algo habitual en todos los lenguajes orientados a objetos. I.a novedad, en 
Visual Basic .Nl ; I, es que dicho código no tiene por qué estar escrito en el mis¬ 
mo lenguaje. Desde Visual Basic NF.T podemos derivar una nueva clase toman 
do aunó base otra escrita en O, J#, C++ o COBOL, por poner algunos ejemplos. 
Tenemos, de esta forma, lo mejor del modelo de componentes COM, que era la 
independencia de lenguaje, v lo mejor de los lenguajes orientados a objetos, la 
herencia de implementacion inexistente en COM. 

Como se dijo anteriormente, todas las clases derivan por defecto deOb ject. 
Si deseamos otra base distinta tendremos que indicarla mediante la palabra 
clave Inherits, como puede verse en el ejemplo mostrado a continuación. 


Public Class ClaseBase 

Public Function Saluda^) As String 
Return "Hola mundo" 



End Function 
End Class 


Public Class ClaseDerivada 
Inherits ClaseBase 

Public Function Cuadrado (ByVal N As Integer) As Integer 
Return N * N 
End Function 
End Class 

L a clase ClaseDer ivada hereda los métodos de ClaseBase y también los 
deObject, que es la ascendiente de ClaseBase. Disponiendo el codigo ante¬ 
rior en un modulo de un provecto de consola, podríamos añadir el fragmento 
siguiente para crear un objeto de la clase ClaseDer i vada e invocar a los mé¬ 
todos Cuadrado () y Saludo! ). 


• P* o • <1,1 I „ ,, 

Public Class Aplicación 
Public Shared Sub Ma¿n{) 

Din» MiCla9e As ClaseDer i vada * New ClaseDer ivada ( ) 

• • iiDi*/ 4 ,r * •» a • 

Consolé.WriteLÍne( " {0} , {1 } **, 

MiClase.Sa ludo( ), MiClase.Cuadrado!5)) 

End Sub 

End Class 

En caso de que haya escrito una dase de la cual no le interese que se deriven 
otras, por considerarla una clase de uso final, no tiene más que anteponer la 
palabra Notlnheritable delante de Class. Pruebe a ponerla en la clase 
ClaseBase, vera como no puede compilar el programa obteniendo un mensa 
je de error (véase figura 7 b). Esa dase, por lo tanto, sólo podría utilizarse para 
crear objetos, pero nunca para derivar otras partiendo de ella. 

También podemos encontrarnos justamente en el caso contrario: haber defi¬ 
nido una clase cuyo objetivo es servir de base para otras. I a clase puede no te¬ 
ner funcionalidad propia, sirviendo simplemente como raíz común de clases 
que compartirían algunos miembros 

Suponga que va a definir una serie de clases que representaran entidades 
gráficas y, para facilitar el trabajo, quiere que todas esas clases compartan una 
serie de miembros comunes. Definir una raíz común tendrá diversas ventajas. 
I sla dase base podría ser la siguiente: 

Public Mustlnherit Class Entidad 
Protected X, Y As Integer 
Protected Color As Integer 

Public Sub Dibuja^) 


End Sub 
End Class 




Figura 7.6. Mensaje que obtenernos al intentar derivar de una clase 
Notlnheritable 

Observe que delante de la palabra Class líenlos dispuesto el modilicador 
Mustlnherit. Con el indicamos que no es posible crear objetos directamente 
con la clase Entidad, siendo necesario derivar otras específicas. Dos de ellas 
podrían ser como las mostradas a continuación: 

Public Notlnheritable Class Punto 
Inherits Entidad 
Public Shadows Sub Dibujaf \ 

Consolé ,WriteI.ine( 

"Un punto de color {0} en la posición Color, X, Y) 

End Sub 
End Class 

Public Notlnheritable Class f.inea 
Inherits EnLidad 
Private Xl, Yl As Integer 

Public Shadows Sub DibujaO 
Consolé .Writel,ine( 

"Una Linea de color {0} desde (1),{2) a {3 ) , {4 1 " , 

Color, X, Y, Xl, Yl) 

End Sub 
End Class 

I stas dos cldsos derivan de Entidad v, ademas, son Notlnheritable, i*s 
decir, son t lases de uso linal. no podiendo derivarse oirás nuevas a partir de 
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ollas. En realidad no llegan a dibujar nada, limitándose a mostrar los datos por 
la consola, l os miembros X, Y y Color, heredados de Entidad, pueden utili¬ 
zarse desde las clases derivadas pero no externamente, va que son protegidos. 
Ll método Dibuja( ), por el contrario, es público. Observe que en las clases 
derivadas hemos antepuesto la palabra Shadows a Sub. Con ella se indica que 
el método que esta definiéndose oculta al heredado de la clase base. 


Nota 

Las clases que sirven como raíz pero no pueden ser usadas para crear obje¬ 
tos. como es el caso de Entidad, se denominan clases abstractas. 


Constructores y destructores 

W igual que en Ch, Java, Object Pascal o O, las clases definidas en Visual 
Basic NT I pueden contar con unos métodos específicos para controlar la cons¬ 
trucción y destrucción de objetos. Esos métodos son conocidos genéricamente 
como constructores \ destructores. Una misma dase puede contar con múlti¬ 
ples constructores, siempre que cuenten con dilercntes listas cié parámetros, 
mientras que destructor sólo puede haber uno por clase. Los constructores siem¬ 
pre tienen por nombre New( ) y no cuentan con valor de retomo, podiendo 
tomar o no parámetros según interese. I I destructor no tiene valor de retorno \ 
no puede tomar parámetro alguno. Su nombre sera Finalize( ). 


Nota 

En cierta forma, el constructor y destructor de una clase Visual Basic NET 
equivalen a los constructoresciass_lnitialize y Class_Terminate 
de un módulo de clase de Visual Basic 6.0. 


En el momento en que se crea un objeto de una cierta clase, utilizando para 
ello el operador New, se ejecuta automáticamente el constructor que coi respon¬ 
da según los parametros facilitados. I I destructor de una dase se ejecuta para 
un i ¡erto objeto automáticamente cuando ya no hay ninguna relerenda .1 el, es 
decir, no necesitamos destruir los objetos explícitamente, es un trabajo del que 
se ocupa el sistema de recogida de basura de la plataforma NI I Debido a es 
to no es posible asegurar que el destructor para un cierto objeto se ejeiute de 
manera inmediata en cuanto éste va no está en uso, puesto que la reíogida de ob¬ 
jetos no útiles se efectúa en momentos concretos en los cuales no hav otra adi 
v ¡dad pendiente. 

I I siguiente I ragnienlo muestr«i una clase con un constructor sin parámetros, 
un constructor con un parametro v el destruidor. No es luncional puesto que 
no se hace nada en el interior de los métodos y tampoco so ha codtlicado un pim 
to de entrada en la aplicación. 





Class Agenda 


Public Sub Newi ) 
End Sub 


Public Sub NewíByVal Parámetro As Stringj 
End Sub 


Protected Overrides Sub Finalize() 

End Sub 
End Class 

Para crear objetos de esta dase podríamos, por lo tanto, utilizar el operador 
New sin entregar parámetro alguno o bien facilitando una cadena, como se hace 
en las dos sentencias siguientes: 


Dim MiAgenda As Agenda * New Agenda() 

Dim MiAgenda As Agenda ■ New Agenda| M Parametro") 


Nota 

Observe que el destructor no es un procedimiento público sino protegido, 
puesto que no es accesible desde el exterior de la clase y se ejecuta auto¬ 
máticamente. Además, dado que es un método que heredamos en la clase 
Agenda de la claseob ject, para redefinírlo es necesario utilizar la palabra 
Clave Overrides. 


I as clases se definen, por regla general, para poder crear objetos a partir de 
ellas, aunque también es cierto que una clase puede contar con miembros com¬ 
partidos o estáticos y ser utilizada directamente, sin crear objeto alguno. Me¬ 
diante el uso de miembros compartidos es posible mantener información común 
entre todos los objetos de una clase. Dichos miembros no pertenecen a un obje¬ 
to en particular, sino a la clase, por lo que son creados la primera vez que es uti¬ 
lizada y no cada vez que se crea un objeto. 

Está claro, por tanto, que los constructores clásicos no pueden utilizarse pa¬ 
ra ejecutar el proceso de inicio que establezca la clase en su estado por defecto, 
generalmente asignando unos valores determinados a los miembros estáticos. 
Si utilizásemos un constructor para esto, realmente el proceso de iniciación se 
ejecutaría al crear cada nuevo objeto, con lo que la información compartida se 
pe rd e r í a consta nte riten te. 

En Visual Basic .NET existe el concepto de ioiittruclor iir r/asc, un tipo de 
constructor que no puede tomar parámetros y cuyo único modificador posible, 
obligatorio además, es Shared Este constructor se ejecuta tan sólo una vez: 
cuando se aloja la clase en memoria. Es el punto adecuado, por tanto, para pre¬ 
parar los miembros compartidos. 





Clases anidadas 


Como se indicó «interiormente, en el interior de una clase es posible definir 
oirás clases, creando un efecto de anidación. Fsto es útil cuando una cierta cla¬ 
se tan solo va a ser necesaria o útil en el interior de otra, nunca fuera. Suponga 
que tiene una clase Agenda que va a gestionar anotaciones en forma de objetos 
Anotación hsla última clase, suponiendo que nunca va a ser utilizada con otro 
tin, podría definirse en el interior de Agenda. 

Anidar una clase en otra es también una forma de ocultarla va que, no ha¬ 
ciéndola pública, no seria posible* usarla desde el exterior ni aun componiendo 
una referencia completa. Suponiendo que tenemos una clase Agenda v en su 
interior otra llamada Anotación, una sentencia como la siguiente generaría 
un error a menos que hubiésemos usado el modificador Public al definir la 
segunda clase. 

MiAnotacion As Agenda.Anotación = _ 

New Agenda.Anotación{ ) 

Conseguimos, por tanto, la enea psul ación de una clase en el interior de oirá, 
aislándonos del exterior. Hl código siguiente es un programa cúmplelo en el 
que puede verse la definición de las clases Agenda v Anotación, con sus cons¬ 
tructores v destructores, asi como el uso desde otra clase que forma parle de la 
misma aplicación. 

Class Agenda 

Class Anotación 

Shared Sub New() 

Console.WriteLine{"Constructor de clase de Anotación") 

End Sub 


Public Sub New() 

Consolé.WriteLine("Constructor de Anotación") 

End Sub 


Public Sub New(ByVal Parametro As String) 

Conso 1 e .Wri leí.ine ( “Constructor <0)“, Parametro) 

End Sub 


Protected Overrides Sub Finalize() 

Consolé.WriteLine("Destructor de Anotación") 

End Sub 
End Class 


Private MiAnotacion As Anotación 


Public Sub New() 



Consolé.WriteLine("Constructor Agenda") 

MiAnotacion = New Anotacion("Nueva anotación") 

End Sub 


Protected Overrides Sub Finalize() 

Console.WriteLine(“Destructor Agenda") 


MiAnot.acion = Notbing 
End Sub 
End Class 


Class Principal 

Sbared Sub Main() 

Dim MiAgenda As Agenda * New Agendaf) 

Consolé.WriteLine(“Objeto creado") 

MiAgenda * Nothing 

Consolé. WriteLine{ "Fin de la aplicación'') 

End Sub 
End Class 

Al ejecutar este programa podra ver el orden en que se ejecutan los diferen¬ 
tes constructores y el destructor de la aplicación. Tal y como se aprecia en la fi¬ 
gura 7.7, al ejecutarse el destructor se genera una excepción. Esto ocurre porque 
la aplicación termina y, posteriormente, el recolector de basura destruye el ob¬ 
jeto v se ejecuta el destructor. En ese momento el flujo abierto por la aplicación 
para usar la consola ha sido cerrado, v el destructor, al enviar un mensaje, ge¬ 
nera la excepción. 
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Figura 7.7. Resultado obtenido al ejecutar el ejemplo de clases anidadas 


Objetos de una clase 

La finalidad ultima de las clases, a excepción de aquellas que son abstractas, 
es facilitar la creación de objetos que gestionen un cierto proceso u operación 





necesaria en mi programa. I .os objetos se crean a partir de las clases usando el 
operador New, según ha podido ver en algunos de los ejemplos previos. I n ese 
momento se asigna un bloque de memoria para el objeto y se inicia su estado, 
dando el valor por delecto a sus miembros y. si procede, ejecutando el construc¬ 
tor apropiado. I o que obtenemos en la variable es una reíerencia a ese objeto, 
es decir, la dirección del objeto en memoria conjuntamente con información de 
t i po 

( ada objeto de una c lase contara con su propia copia de los miembros de cia¬ 
tos, mientras que compartirá con los demás objetos de la misma i lase los meto 
dos v propiedades. Cuando se invoca a uno de esos métodos se usa la notación 
Ob jeto. Método ( ). cié tal turma que se facilita la referencia del objeto sobre 
<•1 que debe actuarse. II método utiliza esa reíerencia para acceder .1 los datos 
propios de ese objeto \ no de otro. 

Cuando codificamos un método de una clase, por lo tanto, al acceder a los 
miembros de datos estamos utilizando implícitamente la referencia al objeto 
que corresponda Si queremos usar una referencia explícita debemos utilizar el 
idenlificador Me. I ste representa al objeto que ha llamado al método 


Miembros de una dase 

Una clase es como hit molde cuva configuración la establecen sus miem¬ 
bros. I sios pueden ser variables: para contener información relativa a la clase 
o a cada objeto creado a partir de ella; propiedades, miembros que permiten 
personalizar los objetos u obtener información de ellos, métodos: procedimien¬ 
tos \ funciones que operan sobre osos datos, y eventos: señales que permiten a 
los objetos mterai tuar con la aplicación en que son usados 

también es posible introducir en una dase definiciones de enumeraciones, 
estructuras v constantes. 

Independientemente de su categoría, todos los miembros de una 1 . lase pue¬ 
den utilizar los modificadores de visibilidad Private. Protected, Public, 
Friend y Protected Friend comentados con anterioridad Filos determi¬ 
naran los puntos en los que cada miembro será o no accesible Además de la vi¬ 
sibilidad, hav otros factores a tener en consideración durante la defiim ion de 
los miembros de una clase. 

Miembros compartidos 

Una clase puede constar básicamente con dos calegoriasde miembros: aque¬ 
llos que son asoc iados a cada objeto creado a partir de la clase, que suelen de¬ 
nominarse miembros de tn^hiuini, v los que, por el contrario, están asociados a 
la clase en si no a un objeto en particular. I stos últimos son miembros compar 
tidos por todos los objetos de la clase v se distinguen por contar con el moditi- 
cador Sha red l .n otros lenguajes de programación se denominan miembros 
esta I icos. 



Partamos do una clase sencilla, como os la siguiente, en la que existen dos 
miembros: una variable privada v un método público que la manipula v mues¬ 
tra por la consola: 

Class Contador 

Prívate N As Integer 
Public Sub I ncremenl.á { ) 

N +*= 1 

Consolé.WriteLine( N ) 

End Sub 
End Class 

(. ada ve/ que t icemos un objeto Contador este contará con su propia copia 
de la variable N, de t.il manera que el método Incrementa ( ) actuara sobre 
una instancia particular de dicha variable, sin afectar a las de otros objetos. Po¬ 
demos verlo con una simple prueba: 

Dim Objetol As Contador - New Contador!) 

Dim Obieto2 As Contador = New Conr.ador( ) 

Objetol.Incrementa! ) 

Ob jet.o2 . Incrementa! ) 

Objeto].Incrementa!} 

Objeto/.Incrementa!) 


Al ejecutar este código obtenemos la salida mostrada en la figura 7.8. I sla 
claro que Objetol opera sobre una variable N que en nada afreta a la homónima 
de Ob jeto2, como debe ser. Proyectando este comportamiento en otras clases, 
como pueda ser un botón en una ventana, encontramos el sentido Al modifi¬ 
car el titulo de un botón, por ejemplo, no se alertará en ningún momento a los 
títulos de los demas bolones que pudieran existir en la ventana. I os botones 
son objetos croados a partir de una clase en la que el miembro que aloja el titu¬ 
lo no es compartido. 
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Figura 7.8. Los objetos operar sobre variables distintas 


Si modificamos la declaración del miembro N de la clase Contador, ponien¬ 
do la palabra Shared detrás de Prívate, comprobaremos entonces que el 



comportamiento es bien distinto. Al ejecutar el programa obtenemos una secuen¬ 
cia en la que se aprecia que Objetol v 0bjeto2 incrementan y muestran la 
misma variable, lis un mecanismo, por tanto, que permite compartir informa¬ 
ción entre todos los objetos de una misma clase. 

No solo las variables pueden ser compartidas, también es una posibilidad 
aplicable a los métodos. Un método compartido puede invocarse simplemente 
disponiendo delante el nombre de la clase, sin necesidad de crear previamente 
un objeto I I método WriteLine( ) de la clase Consolé, por poner un ejem¬ 
plo, es compartido, por ello podemos llamarlo sin crear un objeto do la clase 
Consolé. 

Un método compartido no está asociado a ninguna instancia de clase, es de¬ 
cir, a ningún objeto creado a partir de ella. Esto implica que al ser invocado no 
reciba la referencia al objeto sobre el que debe actuar, tal y como se describía 
anteriormente 

No es posible, por tanto, usar el identilicador Me para operar sobro el objeto 
implícito porque éste no existe. 

Pruebe a añadir el siguiente método a la clase Contador definida anterior¬ 
mente. 

Public Shared Sub Reinicia() 

N - 0 

End Sub 

l\s un método compartido v, como tal, no podría acceder a la variable N a 
menos que ésta también fuese compartida. Asumiendo que esto es asi, con el 
código siguiente reiniciamos el contador sin necesidad de crear objeto alguno, 
usando el propio nombre de la dase. 

Objetol.Incrementa! ) 

Objeto2.Incrementa( ) 

Contador.Reinicia( ) 

Objetol.incrementa() 

Objet o2.incrementa !) 

l.os métodos compartidos, también conocidos como ntcltulo^ di‘ t/asc son 
apropiados cuando facilitan una operación en la que no está implicado un ob¬ 
jeto concreto y, por lo tanto, la referencia implícita no es necesaria. Va se ha 
puesto como ejemplo el método WriteLine ( ) de la clase Consolé. Otros los 
encontramos en los métodos de la dase Math. 


Nota 

Tal y como se señalaba en el punto dedicado a la construcción y destruc¬ 
ción de objetos, una clase puede contar también con un constructor de cla¬ 
se o constructor compartido. Éste no puede tomar parámetros y se ejecuta 
en cuanto se inicia el programa, habitualmente estableciendo valores ini¬ 
ciales en los miembros compartidos. 




Miembros sobrecargados 


Otra di' las nuevas posibilidades Je» Visual Basic NT I i*s la <ohwcitr$ii de 
métodos, característica que nos permite tener rn una misma dase varios molo- 
dos ion el mismo nombro siempre que la lisia do parámetros sea distinta. Do 
esta lorma no tenemos porque iinrnhti nombres distintos para denominar a mé¬ 
todos que, realizando la misma íunción, loman parámetros distintos. 

Para indicar que un determinado método sobrecarga a otro se utiliza la pa¬ 
labra clave Overloads I n realidad, no es necesario indicarlo de manera ex¬ 
plícita siempre que los distintos métodos tormén parte de la misma clase Si el 
método sobrecargado se hereda de una clase base, por el contrario, si es obliga 
torio utilizar Overloads ya que, de lo contrario, el compilador no sabría si lo 
que se quiere es sobrecargar, redefinir u ocultar el método original 

I n multitud ile ejemplos, de este capitulo \ los •interiores, hemos utilizado el 
método Wr i. teLine( ) para mostrar datos por la consola. I n ocasiones hemos 
entregado como único parametro una cadena o una variable entera, mientras 
que en otros los parametros han sido varios. l : sto es posible gracias a la sobre¬ 
carga v, gracias a ella, no hay necesidad de tener un método WriteString( ). 
otro WriteBoolean( ). olio Writelnteger( ), ele. 

l a dase siguiente es un ejemplo sencillo en el que se otrece un método con 
diis versiones distintas, uno para dibujar puntos v olro para circunlerencias 
I os tíos métodos son compartidos, de tal (orina que no es necesario crear un ób¬ 
lelo para invocarlos 


Public Class Lienzo 

Public Shared Sub Dibuja(ByVal X As Integer, ByVal Y As Integer ) 

Consolé . WriteLine{ "Plinto en { 0 } , { 1 ) **, X, Y) 

End Sub 


Public Shared Sub DibujalByVal X As Integer, 

ByVal Y As Integer, ByVal R As Integer) 

Consolé. Wri Lel.ine ( 

"Circunferencia con centro en (0),{1) y radio <?>", X, y, R) 

End Sub 

End Class 

Desde el método Main( ) de nuestro programa podríamos usar las dos sen¬ 
tencias siguientes para llamar a esos dos métodos: 

l. ienzo. Dibu j a ( t 0, 20) 

Lienzo.Dibu ja( 1 00, 100, 50) 

Aunque en este caso podría resultar lógico conlar con un método Punto( ) 
v olro C i rcunferencia ( ),cn la práctica podríamos tener múltiples métodos 
Circunferenc i a { ), cada uno de ellos aceptando una lista de parámetros dis¬ 
tinta- un centro v un radio, dos esquinas ríe un cuadrado donde se incluiría, etc. 



Observe que no liemos utilizado la palabra Overloads va que, ai estar los 
dos métodos en la misma víase, Visual Basic asume que deseamos sobrecargar 
los Un caso dislinlo seria el de la clase siguiente: 


Public Class LienzoExtendido 
Inherits Lienzo 

Public Overloads Shared Sub Dibina( 

ByVal X As Integer, ByVal Y As Integer, ByVal C* As String) 

Consol e . Wi i leLi tie Punto en {0),{1) con color (2}", x, Y, C) 

,End Sub 
End Class 

I n este caso Overloads resulla imprescindible porque, de lo contrario, ob¬ 
tendríamos un error al no saber si se quiere sobrecargar nuevamente el méto¬ 
do, contando con tres versiones distintas de el, o quiere redelinirse u ocultarse 


Nota 

La sobrecarga es aplicable también a los constructores, de tal forma que 
podemos tener varios aceptando distintos parámetros para establecer la 
configuración inicial del objeto. 


Miembros redefinidos y ocultos 

La derivación de una nueva clase partiendo de otra existente, como va sabe, 
implica la herencia de todos sus miembros, entre oíros los métodos con que 
pudiera contar la que actúa como base. I s lo que ha ocurrido, por ejemplo, al 
def inir LienzoExtend i do. dase que puede utilizarse para llamat a cualquie¬ 
ra de las tres versiones del método sobrecargado 

I s relativamente fácil encontrarse en una situación en la que un método he¬ 
redado no implemento su función tal v como es necesaria en la clase derivada, 
siendo necesario redefinirlo u ocultarlo, l a sobrecarga en este caso no es apli¬ 
cable, va que no nos interesa contar con dos versiones del mismo método \ 
ademas, la nueva versión probablemente tendrá la misma lista de para metro 
que la del inida en la dase base, lo cual baria inviable el use» di* Overloads 

Suponga que ha definido una clase, como Lienzo, con métodos para dibu¬ 
jar puntos, circunferencias, lineas, etc. lista dase contaría con un método, por 
ejemplo llamado Dibuja( ), que seria el encargado de llevar todas esas enti 
dades «il dispositi\ o lina! de dibujo: l.i pantalla. Posteriormente deiule dei i\ ai 
una i lase lomando a Lienzo como base. Su finalidad sera permitir exactamen¬ 
te las mismas operaciones de dibujo pero, en lugai de enviarlas .1 la pantalla, 
enviándolas a la impresora I I método Dibuja( ), por tanto tendría que ser 
redelimdo. I I caso sena el siguiente: 


Public Class 1 1 1 h 11 11 




Public Overridable Sub Dibuja() 

Consolé.WriteLine{"Dibujando en pantalla") 

End Sub 

End Class 

Public Class Lienzolmpresora 

Inherits Lienzo 

k ÍK- T O (t-U l r-ü> ; . .tt i> f>t* . f *1 üi. 4r f\'; rr Pl'i'íui <» 

Public Overrides Sub Dibuja{ ) 

Consolé.WriteLine("Dibujando en la impresora") 

End Sub 

End Class 

Observe que el método de la dase base ha sido definido como Overridable, 
permitiendo así su redefinición en las clases derivadas. Estas deben usar el mo¬ 
dificador Overrides para indicar que redefinen el método, es decir, facilitan 
una nueva implementación para ese miembro, no una nueva versión Al llamar 
al método Dibuja ( ) de un objeto de la clase Lienzo se ejecutará la implemen¬ 
tación de esa clase, mientras que en un objeto de la clase Lienzolmpresora 
se ejecutaría el de dicha clase. 

Para redefinir un método es necesario que su firma, compuesta por el nom¬ 
bre, lista de parámetros v tipo de retorno, sea idéntica a la del método redefinido. 
Una alternativa es la creación de un nuevo método que oculta al de la clase ba¬ 
se, en lugar de redefinirlo. Ese nuevo método debe tener el mismo nombre, pe¬ 
ro por lo demás puede diferir en parámetros y tipos. Es más, incluso puede ser 
otro tipo de miembro, como una propiedad. Para ocultar un miembro hereda¬ 
do tan solo lias' que cambiar la palabra Overrides por Shadows Las implica¬ 
ciones de usar uno u otro método las conocerá de inmediato, al abordar el uso 
polimorfico de objetos. 

Que un método cuente con el modificador Overridable indica que se per¬ 
mite su redefinición en las clases derivadas, pero no se exige. Otros dos modi¬ 
ficadores, relacionados con este, son NotOverridable y MustOverr Lde. Como 
puede suponer, el primero indica que un método no puede ser redefinido, mien¬ 
tras que el segundo cambia ese permite por una obligación de rede!inir el meto- 
do en las ciases derivadas. 


Nota 

El uso conjunto deMustlnherit, en una clase, yMustOverri.de, en sus 
miembros, facilita la creación de clases base que actúan como plantillas de 
partida para crear otras más especializadas. 


Acceso a los miembros de la clase base 


Cuando en una clase derivada se oculta o redefine un método, en ocasiones 
puede ser necesario invocar, desde el nuevo método, al que se había heredado 






do la clase base. I s algo habitual cuando la nueva clase lo que hace es comple¬ 
mentar en cierta medida el funcionamiento de la que actúa como base, pero ne¬ 
cesitando aun la ímplementacion de esta. Suponga que la clase Lienzo efectúe 
un proceso de preparación para almacenar toda la información de las entida¬ 
des, proceso que en Lienzolmpresora debe complementarse con la conligu 
ración de la propia impresora Desde el constructor de Lienzolmpresora 
por tanto, habría que invocar al de Lienzo 

I n estos casos, al necesitar desde un método de una lase acceder ti los de la 
clase base, usaremos el identilicador MyBase. Recuerde que Me representa a la 
instancia, al objeto, de una clase determinada. MyBase, por su parte, represen¬ 
ta *i la pon ion de ese objeto implementada por la clase base. 

Podemos complementar las clases Lienzo \ Lienzolmpresora precisa¬ 
mente con ese funcionamiento, implementando un constructor en la clase base 
v otro en la derivada, invocando til primero desde el segundo. 

Public Class Lienzo 
Public Sub New() 

Conso le.WriteLine("Preparamos el a 1 manenamienLo de en i idades - j 

End Sub 


Public Overridable Sub Dibuja!) 

Conso le . Wr ítel.i ne | **Di bu ¡¡ando en pantalla") 

End Sub 
End Class 

Public Class Lienzolmpresora 
Inherits Lienzo 

Public Sub New() 

U **5 4 * * ' 1 *4 4 é • sm 

MyBase.New() 

Consol e . WriteLine (" Piepa tamos 1.a impresora") 

End Sub 


Public Overrides Sub Dibuja() 

Consolé . Wn teLine (" D i bujando en la impresora") 

End Sub 
End Class 

t.l resultado de ejecutar el fragmento de código siguiente, en el que so crea 
un objeto de la clase Lienzolmpresora y se invoca a su método Di bu ja ( ). 
es el mostrado en la figura En el puede ver como se ha ejecutado primero el 
constructor de la clase base, después el de la derivada y, finalmente, el mencio¬ 
nado método Dibuja ( ) 


Din» Objeto As Lienzo Impresora - New T- ienxolmpr’ésora O 
Objeto.Dibuja( ) 
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Figura 7.9. Sucesión de llamadas al crear el objeto Lienzoimpresora 

Uso polimórfico de los objetos 

Lo horcncio do clases no solo represento una de los tormos de reulili/ocion 
del código sino que, odemos, habilito un meconismo conocido como polimorfismo, 
gracias al cual es posible utilizar objetos de distintos clases, pero que compar¬ 
ten uno raí/ común, de manera genérica, hn definitiva, el polimorfismo nos 
permite ahorrar trabajo, asi como extender la tuncionalidad de las clases de 
objetos sin, por ello, tener que conocer de antemano todos los tipos derivados. 

Para comprender el conceplo de polimorfismo hay que entender antes que 
cualquier objeto creado a partir de una clase derivada de oirá es, en cierta for¬ 
ma, un superconjunto de la base Suponga que ha construido un circuito digital 
con las funciones de un reloj v, tomándoosle como base, ha añadido los elemen¬ 
tos necesarios para realizar cálculos simples. Cuenta con dos circuitos distintos, 
uno para montar en carcasas de reloj de pulsera y otro para colocarlo en cajas 
de calculadora con reloj. F.l segundo circuito, en caso necesario, podría mon¬ 
tarse en una caja de reloj porque cuenta con esas funciones. F.l primero, por el 
contrario, no podría utilizarse en una calculadora por razones obvias: no dispo¬ 
ne de la lógica para realizar cálculos. 

Algo similar ocurre con las clases que están derivadas unas de otras Si te¬ 
nemos una clase Rectángulo derivada de EntidadGraf ica, una variable de 
este segundo tipo puede contener una referencia a un objeto de la primera va 
que, al fin y al cabo, un objeto Rectángulo contiene toda la funcionalidad de 
un objeto EntidadGraf ica más elementos específicos y propios. Puede verlo 
en el código siguiente que define las dos clases mencionadas v otras dos deri¬ 
vadas de EntidadGra f ica. 


•: .*• «r- ‘ f...i * •)».«;! a* 

Public Mustlnherit Class EnLidadGraflea 

- t«.. i -* ,. .i »• - r «j - 

Protected íXl, iYl, iX2, i¥2 As Integer 
Protected sColor As String 








I • I. 


Public Sub New(ByVal 
ByVal Y1 As Integer, 

ByVal Y2 As Integer, 

• os o ' • ííj i»' 

iXl « XI 
1X2 - X2 
iYl * Yi 
ÍY2 “ Y2 
sColor * Color 
End Sub 

.oor.u a * -j%*» rj . u.-i*'- 

jut* f* t , .»• 

Public MustOverride Sub Dlbuja() 
End Class 


Public Class Rectángulo 
Inherits EntidadCrafica 

‘ í*~»o , . #• 

Public Sub New(ByVal XI As Integer, 

ByVal Y i As Integer, ByVal X? As Integer, 
ByVal Y2 As Integer, ByVal Color As String) 

M t| A' ««£ «» |f> J j 4 - {• t9 r * 

MyBase.New(XI, VI, X2, Y2, Color) 

End Sub 


Xl As Integer, 

ByVal X2 As Integer, 
ByVal Color As String) 

o y n. os tit” *• .!• 


Public Overrides Sub Dibuja() 

Consolé . Wri t. eLine ( " Recta ngu 1 o ( { 0 > , (1 ) )- ( <2), 1 i 
ixl, iy1, ix2, iy2, scolor) 

End Sub 
End Class 

Public Class Ovalo 

Inherits EntidadCrafica 

Public Sub New(ByVal Xl As Integer, 

ByVal Y1 As Integer, ByVal X2 As Integer, 

ByVal Y2 As Integer, ByVal Color As String) 

MyBase.New1X1 r Yl, X2, Y2, Color} 

End Sub 

Public Overrides Sub Dibuja() 

Consolé.WriteLine(”óvaI o ( (0) ,{1>)-({2},{3 y) en 
ixl, iyl, ix2, Íy2, scolor) 

End Sub 
End Class 


Public Class Linea 

Inherits EntidadGra t ica 

Public Sub New(ByVal Xl As Integer, 

ByVal Yl As Integer, ByVal X2 As Integer, 
ByVal Y2 As Integer, ByVal Color As String) 


) ) color {4 >' 


color {4)", 



MyBase. New(XI, Yl, X2, Y2 , Color) 

End Sub 

PubLic Overrides Sub Dibuiaf) 

Consolé.Wri te!,ine( "Linea ( { 0 }, { 1 > ) - ( < 2 ) , { 3 >) en color ( 4 ) " , 
i x l , iyl, ix2, iy2, scolor) 

End Sub 
End Class 


Nota 

En la definición de las clases derivadas se usa Overrides para redefinir 
un método de la clase base. Ese método heredado podría ser invocado, 
usando MyBase, en caso de no haber utilizadoMustOverride en la clase 
base, igual que hacemos en los constructores de las clases derivadas para 
llamar al constructor de la base. 


Suponga que desea crear una composición gráfica formada por una linea, 
un rectángulo y un óvalo. En principio podría pensar en crear un objeto de ca¬ 
da una de esas clases asignando las respectivas referencias a una variable espe¬ 
dí ica. procediendo a continuación a llamar al método Dibuja ( ) de cada uno 
de ellos. Es lo que se hace en el siguiente fragmento de código: 

Dim UnaLinea As Linea New Línea(0, 0 , 320, 240, '‘Rojo'') 

Dira UriRertanquio As Rectángulo - _ 

New Rectangulo(10 , 10, 100, 100, "Negro") 

Dim UnOvalo As Ovalo - New OvalofSO, 70, 80, 11, "Verde") 

UnaLinea. Di bu ja {) 

UnRectangu1 o.Di bu ja{ ) 

UnOvdlo.Dibuja() 

En este caso estamos tratando a cada elemento como un objeto de una clase 
distinta v, a pesar deque lo son, no-tenemos en cuenta que lodos ellos compar¬ 
ten una raí/ común. Aprovechando esta característica, sena más fácil usar el có¬ 
digo siguiente para conseguir el mismo objetivo, especialmente si en lugar de 
tres entidades estamos trabajando con decenas de ellas. 


Dim Composición!) As Entidadorafica = _ 

(New RectanquIo(10, 10, 100, 100, "Negro"), 

New Ova lo(SO, 70, 80, 1 10, "Verde"), 

New Lineal 0, 0, 320, 240, "Rojo")) 

Drm Elemento As Fnt idadGraf ica 

For Each Elemento In Composición 


E1 emento.Dibuja{) 

Next 





tn oslo caso no tenemos varias variables independientes sino un arreglo de 
tipo EntidadGrafica. Dado que esta clase es base de Rectángulo, Ovalo v 
Linea, les elementos del arreglo pueden ser de cualquiera de esas clases. Al 
recorrer el arreglo llamando al método Dibuja ( ) obtenemos el resultado de 
la figura 7.1(1. A pesar de que el tipo de Elemento es EntidadGraf ica, al lla¬ 
mar «iI método Dibu ja ( ) se utiliza la implemontacion especifica de la clase de 
objeto que corresponda. Rslo es, precisamente, el polimorfismo y, gracias a el 
podemos tratar de forma genérica objetos de distintas clases. 



Figura 7.10. Cada objeto invoca al método correspondiente a su tipo 


Otro caso típico en el que es interesante este tratamiento genérico, por men¬ 
cionar los más usuales, se da cuando implenicn tamos alguna función o proce¬ 
dimiento cuya finalidad es operar sobre objetos que tienen una característica 
común. Suponga que va a implementnr un procedimiento al cual facilitándole 
un objeto de una clase derivada de EntidadGraf ica se encargue de escribir 
sus dalos en un archivo, para lo cual usaría un método que en la clase base ha 
bria declarado como Mus tOverr i de, obligando a su implcmenlacion en cual 
quier derivada, liso hipotético método no tiene por qué conocer clases como 
Linea, Ovalo o cualquier otra clase que pudiéramos haber definido, usando 
EntidadGraf ica como tipo del parámetro a recibir: 

Sub Guarda(ByVal Entidad As Ent idadGra fica > 

Consolé .WriteLine< Fnt. idad.Esciibe{ ) ) 

End Sub 

Siempre que el objeto facilitado a Guarda ( ) esté derivado de Entidad¬ 
Graf ica, no importa su tipo, este procedimiento podrá efectuar su trabajo sin 
problemas 


Interfaces 


A diferencia de Ch, en el que es posible derivar una clase de múltiples ba¬ 
ses, en Visual Basu .NI I no oviste el concepto de herencia múltiple, como en 









muchos otros lenguajes. Al definir una clase no podemos, por tanto, especifi¬ 
car dos clases base. Si es posible, no obstante, indicar que se implementan mul- 
liples interfaces. 

Lna interfaz es una especie de contrato en el que se enumeran los métodos 
que la componen, indicando tipos de retornos v listas de parámetros. En len¬ 
guajes como C v C++ las interfaces no existen corno construcción nativa del 
lenguaje, por lo que se definen en forma de estructuras o bien clases abstractas 
con métodos virtuales puros. En contraposición, Visual Basic NI I si dispone 
de interfaces como elementos nativos del lenguaje 


Nota 

Las interfaces habilitan asimismo el uso polimórfico de objetos de diversas 
clases sin la exigencia de que todas ellas tengan una raíz común, bastando 
la implementación en todas ellas de la misma interfaz. 


Definición de una interfaz 

Salvo por el hecho de que los miembros de una interta/ no cuentan con im- 
plementación. Jo cierto es que su sintaxis es práctic amente idéntica a la de una 
c lase’ cualquiera, pudiendo contar con métodos, propiedades, mdexadores, etc 
Básicamente se trata di' sustituir la palabra Class por Interface, teniendo 
en cuenta, por supuesto, que lo que estamos definiendo es un acuerdo o espe¬ 
cificación al que podran ajustarse posteriormente las clases que lo necesiten, 
no una implementación. 

Supongamos que vamos a crear varias clases que actuarán como agenda, por 
lo que deseamos que, de cara al usuario de esas clases, todas compartan una 
interta/ común. De esta forma, el programador que las utilice podrá elegir en¬ 
tre una clase u otra, por ejemplo dependiendo de donde desee almacenar la in¬ 
formación. pero sabiendo siempre que contará con los mismos mecanismos de 
acceso a la clase. 

I I siguiente fragmento de código define una interfaz, llamada lAgenda, 
declarando un método Enumera ( ) luí este caso es el único miembro, pero po¬ 
dríamos añadir lo que deseásemos, lújese en que no existe una implementación. 

Interface lAgenda 
Sub Enumera() 

End Interface 

Implementación de una Interfaz 

La clase que necesita ¡mplementar una determinada interfaz, por ejemplo 
una hipotética clase Agenda, tan solo liene que indicarla Iras la palabra Im- 
plements. Esta formará parte de la cabecera de la clase, como la palabra clave 
Inherits. La diferencia es que al derivar de una clase se heredan todos sus 





miembros, incluida la implecnentación de los métodos, mientras que al indicar 
la implementacion de una interfaz lo único que obtenemos es la obligación de 
implementar los miembros definidos en ella. 

Una dase tan sólo puede derivar de otra, como se indicaba antes, pero nada 
le impide implementar varias interfaces. En este caso se indicarían los nombres 
de esas intertaces uno tras otro separados por comas. Los métodos correspon¬ 
dientes a cada interfaz deberán indicarlo con la misma palabra Implements 

El siguiente ejemplo muestra dos interfaces diferentes, asi como una clase 
que implementa una de ellas v otra que implemento las dos. En realidad no 
hay código ejecutable que haga nada útil, es simplemente una demostración de 
la sintaxis a utilizar. 

Module Modulel 
Sub Main() 

kl lipa ctr 4! icm fu r*& Mc/eildo* t.fí j »**•■! fu-* 

Dim MÍAgenda() As IAgenda * {New Agenda(), New AgendaArchivo()> 

jnvnrJfliis .7' fl*a*f mli» <n, 1 ‘ •'•C 1 

MiAgenda(0).Enumera(J 

MiAgenda!1).Enumera!1 

End Sub 

End Module 

f <r IW'Wf f»l ' *• * I «• —' * »• *>?*•’1# 

Interface IAgenda 
Sub Enumera() 

End Interface 


« • • ~ . r * r < . ». 

Interface IPersistente 

Function Almacena! ) As Booiean 

Function Recupera!) As Booiean 

End Interface 

I m * .1 1 1 t t i h • 1/ ♦ ' ■* ,) “ r* * «■.. 

Class Agenda 

Implements TAgenda 

Public Function Ariade( 

ByVal Anotación As String) As Booiean 
Return True 
End Function 

Public Sub Enumera() Implements TAgenda.Enumera 
Consolé.WriteLine("Clase Agenda") 

End Sub 
End Class 


Class AgendaArchivo 

Implements IAgenda, TPersistente 


Public Sub Enumera!) Implements IAgenda.Enumera 



Consolé.WriteLine(“Clase AgendaArchivo") 

End Sub 

Public Function Almacena() As Boolean _ 

Implements TPersistente.A1 macena 

Return True 

End Function 

Public Function Recupera () As Boolean 
Implements I Persistente.Recupera 
Return True 

End Function 
End Class 

Observe que los métodos que implementan la funcionalidad detinida en las 
interfaces lo indican usando la misma palabra Implements seguida del nom¬ 
bre 4 de la interfaz y el propio método. I'n el método Main ( ) usamos un arreglo 
de tipo lAgenda para tratar de manera polimórfica objetos de dos clases que. 
sin tener una base especifica como ocurría con EntidadGraf ica. implementan 
una misma interfaz. 


Módulos 


Además de clases v definiciones de tipos, tales como estructuras v enume¬ 
raciones, en un ámbito podemos encontrar también motiitlos. Un módulo es una 
clase con algunas características implícitas: no es posible derivarlo de otra cla¬ 
se ni usarlo como base para la definición de una nueva, todos sus métodos son 
compartidos, a pesar de no usar explícitamente el modificador Shared. v su 
visibilidad esta abierta a todo el modulo de código en el que esta definido. 

li\ módulo, como ha podido ver en algunos de los ejemplos propuestos, se 
usa habiliulmente para introducir el método Main( ) que actúa como punto 
de entrada a la aplicación. Nada nos impide, sin embargo, usar el modulo para 
alojar otros métodos e. incluso, tener varios módulos lógicos en el mismo mo¬ 
dulo tísico de código, aunque no sea habitual. 


Puntos clave 


• I as definiciones de tipos e identilicadores se alojan en Visual Basic NFT 
en el interior de ámbitos con nombre, espacios lógicos a los que se asigna 
un nombre. 

• Los tipos definidos en el interior de un ámbito con nombre forman un 
grupo lógico que puede ser importado desde otros ámbitos en caso nece¬ 
sario. 

• Al importar un ámbito con nombre en otro es posible asociar un alias al 
nombre original del ámbito para evitar conflictos entre identilicadores. 



• Visual Basic NFT es un lenguaje totalmente orientado a objetos v dispo¬ 
ne de las características esenciales de este tipo de lenguajes: encapsulación, 
herencia y polimorfismo. 

• í.as clases son tipos di* datos a partir de los cuales podemos crear obfetos. 
F.stos pueden contener miembros de dalos, métodos, propiedades, dele¬ 
gados y eventos. 

• Cada clase puede tener uno o mas constructores, lodos ellos llamados 
New( ), v un destructor que será ejecutado automáticamente por el recolec¬ 
tor de basura. 

• Visual Basic Al I contempla la sobrecarga de métodos, de lorma que es 
posible tener varias funciones o procedimientos que comparten un nom¬ 
bre pero toman una lista distinta de parámetros. 

• Gracias a la herencia es posible crear una clase a partir de otra ya exis¬ 
tente, heredando todos sus miembros que, en caso de necesidad, pueden 
ser redelinidos v ocultados. 

• Cada ve/ que se crea un objeto este dispone de una copia de los datos v 
comparte la funcionalidad de los métodos definidos en la clase 

• Una clase puede contar con miembros compartidos, llamados estáticos 
en otros lenguajes de programación, habilitando asi el uso compartido de 
datos entre objetos. 

• Mediante el polimorfismo es posible tratar de manera genérica objetos 
que, siendo de distintas clases, cuentan con una raíz común o bien imple- 
mentan una misma interfaz. 

• I as interfaces son definiciones sin miplemenlación, pensadas para apli¬ 
carse en la codificación de clases que deben contar con unos servicios bien 
conocidos. 

• Los módulos son un caso particular de clase con algunas características 
especificas 


Resumen 


Como ha podido ver en este capitulo, Visual Basic Al I incorpora noveda¬ 
des en el lenguaje que elevan su categoría basta el mismo nivel que otros len¬ 
guajes orientados a objetos, tales como C'++, lava o C A Respecto a las versiones 
previas de Visual Basic, contamos con la posibilidad de delinir clases sin usar 
módulos específicos, los conocidos módulos de clase de V isual Basic 6, aparte 
de contar con posibilidades tan importantes como la herencia, sobrecarga de 
métodos o la definición e ¡mplementación de interfaces. 

I n el interior de una clase, como se ha explicado, es posible introducir defi¬ 
niciones de nuevos tipos, como enumeraciones u otras clases, asi como miem- 



bros de datos v métodos. De esta numera se encapsula en los objetos una tun 
eionalidad discreta que, posteriormente, puede ser utilizada a demanda en las 
aplicaciones donde sea necesario. Son Lis ventajas de un lenguaje orientado a 
objetos. 

Visual Basic NI I no es solo un lenguaje orientado a objetos, sino también 
orientado al uso de componentes, como en versiones previas. I I próximo capi¬ 
tulo le guiara en el proceso de añadir propiedades, usar delegados y codificar 
eventos en sus clases, convirtiéndolas en verdaderos componentes rcutili/ables 
di* manera visual. 





5 

Programación 
orientada 
a componentes 


Uno tio los t"¿icioros determinantes paro el éxito do Visual Basic, desdo su 
aparición, ha sido la facilidad do utilizar componentes prefabricados para de¬ 
sarrollar aplicaciones propias. Primero fueron los conocidos como VBX, des¬ 
pués los OCX o componentes ActiveX y ahora, con Visual Basic .NF.'I, tenemos 
los componentes .NF.T. 

La programación do aplicaciones usando componentes fue lo que dio ori¬ 
gen al termino RAD {Ruiml Application DcvcU'fwh'itt), tan difundido posterior¬ 
mente para otros lenguajes y sistemas. 

Los componentes son objetos creados a partir do una clase, si bien el objeti¬ 
vóos que dichos objetos puedan crearse de manera visual, por ejemplo introdu¬ 
ciéndolos en un contenedor mediante un diseñador, y personalizarse mediante 
el establecimiento de propiedades y asociación do código a sus eventos. Una 
clase de componente, por tanto, no solo contará con miembros de datos v mé¬ 
todos, disponiendo también esos elementos. 

Nuestro objetivo, en este capítulo, es aprender a añadir propiedades, dele¬ 
gados v eventos a nuestras clases, dando asi el primer paso para su conversión 
en clases de componentes. 

Id capítulos posteriores profundizaremos sobre las particularidades de los 
componentes NLT asi como los puntos específicos para los controles Windows 
y Web. 






Propiedades 


Las clases almacenan información que, en muchas ocasiones, no solo es pa¬ 
ra uso interno sino que también puede interesar al programador que las utilice. 
Ya sabemos que los datos se almacenan en campos de datos o variables, cuya 
visibilidad podemos controlar mediante diversos modificadores. Suponga que 
desea que el valor de una cierta variable pueda ser leído externamente pero no 
modificado, o bien que cada ve/ que se modifique pueda controlar el nuevo 
valor para saber si es valido. Éstos son algunos de los casos adecuados para 
definir una propiedad. 

Al igual que las variables, las propiedades tienen un tipo que indica la na 
luralc/a de la información que contienen. A diferencia de ellas, sin embargo, la 
asignación o lectura no se efectúa de manera directa sino a través de la ejecu¬ 
ción de métodos de lectura y escritura 

Definición de una propiedad 

Una propiedad aparece a los ojos del usuario de una clase como si fuese una 
variable, pero en realidad internamente existen unos métodos de acceso que 
son los que c ontrolan la lectura o asignación de valores. I a definición se otee 
lúa con la palabra Property, tras la cual dispondremos el nombre de la pro 
piedad, la palabra As y el tipo. Üpcionalmenlc, delante de Property es posible 
usar los modificadores de ámbito que conocimos en el capitulo previo, l a si 
guíenle linea, por ejemplo, seria el encabezado de una propiedad de tipo String 
llamada Nombre 

Public Property Nombre)) As String 

I I final de la definición vendrá marcada por End Property. I n el cuerpo 
de la propiedad introduciremos dos apartados, llamados Get v Set, que serán 
ejecutados cuando se recupere el valor de la propiedad v se asigne, respectiva¬ 
mente. Se asume que el apartado Get devolverá un valor del tipo indicado en 
la cabecera de la propiedad, mientras que Set tomara dicho parámetro l o ha¬ 
bitual es que el valor se almacene internamente en alguna variable v se devuel¬ 
va cuando sea necesario, aunque en realidad nada nos impide implementar 
una funcionalidad distinta. 

A continuación puede ver la definición completa de la hipotética propiedad 
Nombre ( ) I n este fragmento de código se asume que Pnombre es una varia¬ 
ble privada dec larada al principio de la clase y usada para almacenar el valor 
de la propiedad. 

Public Property Nombre)) As String 
Get 

Return Pnombre 
End Get 

SetiByVal Valué As String) 



Pnombre 3 Valué 

End Set 
End Property 

Aunque un usté ejemplo nos limitamos a almacenar el valor o devolverlo, en 
la practica podríamos efectuar comprobaciones o elaborar el valor a devolver a 
partir de otros dalos. I I acceso a la propiedad, creando un objeto de esta clase, 
sería idéntico al acceso a cualquier miembro de datos. 

Propiedades de sólo lectura y sólo escritura 

Mientras no se indique lo contrario de manera explícita, toda propiedad de¬ 
be contar con los apartados Get v Set, de tal manera que el usuario de los ob¬ 
jetos pueda tanto leer el valor como modificarlo, tn ocasiones, sin embargo, 
puede interesarnos que una determinada propiedad sólo pueda ser leída, a 
modo informativo, poro no modificada. Aunque es menos habitual también 
puede darse el caso contrario, tener una propiedad que sólo pueda modificarse 
pero nunca leerse 

Para indicar que una propiedad sera solo de lectura has que disponer el 
modificador ReadOnly delante de la palabra Property. hn el cuerpo de la 
propiedad existirá tan sólo el apartado Get, facilitando la recuperación del va¬ 
lor. De manera análoga, existe el modificador WriteOnly para aquellas pro¬ 
piedades que sólo sean de escritura. P.n el código siguiente puede ver una clase 
con dos propiedades, siendo una de ellas de sólo lectura. 

Module Modulel 


Sub Main{) 

Dim MiFicha As Ficha * New _ 

Ficha<"Francisco Charle", "El Almendral") 
Consolé .WriteLine { ** {0 } -> {1 } " , 

MiFicha.Nombre, MiFicha.Dirección) 
i ** “ F’.i »• jj c * 

MiFicha.Dirección * "El Nogal" 

Consolé.WriteLine(“{0> -> <1>", 

MiFicha.Nombre, MiFicha.Di receion) 

End Sub 
End Module 

é* i • ií í -re • ri/wi n *.*u*frros 

Class Ficha 

<f k v«* 4 ; ;¿t< *'9 p: rv.ro • «• 

Private Pnombre, Pdireccion As String 


••ri 

t- 1 


Private Sub New() 


End Sub 



Public Sub NewfByVal N As String, 
ByVal D As String) 

Pnombre = N 
Pdireceion * D 

End Sub 


Public ReadOnly Property Nombre() As String 
Get 

Return Pnombre 
End Get 
End Property 


Public Property Direccion() As String 

Get 

Return Pdxreccion 

End Get 

Set(ByVal Valué As String) 

Pdireccion * Vaiue 

End Set 
End Property 
End Class 

Observe que el constructor por defecto, aquel que no toma parámetros \ crea 
un objeto vacio o con sus miembros de dalos sin un valor inicial, se lia declara¬ 
do como privado Con esto evitamos que pueda crearse un objeto de la clase 
Ficha en el que el Pnombre quede sin un valor inicial, puesto que la propie¬ 
dad Nombre no permite una asignación posterior. Dicho de otra forma, esta¬ 
mos obligando a usar el segundo de los constructores. Al ejecutar este código 
debería obtener un resultado similar al de la ligura 8.1. 



I óticamente, en los métodos de lectura y asignación puede eleduarse cual¬ 
quier proceso que se considere necesario, no limitándonos a devolver o guar¬ 
dar el nuevo valor como hemos hecho en este ejemplo. 



Propiedades con índices 

Pn caso necesario, una propiedad puede lomar parámetros que, hnbilual- 
menle, se utilizan para indexar el valor que quiere recuperarse o mollificarse. 
Pueden ser varios s de cualquier tipo, aunque lo mas corriente es que sea uno 
di* lipo numérico, ti parámetro, v su tipo, sera especificado entre paréntesis 
detras del nombre de la propiedad, f n los apartados Get v Set puede ser uti¬ 
lizado como convengo 

ti tipo de los parámetros, como se ha dicho, puede sor cualquiera, incluso 
uno creado por nosotros. Podríamos, por ejemplo, definir una enumeración v 
utilizar sus valores como índice de una propiedad. I I código siguiente corres¬ 
ponde a una clase con dos propiedades: Anotación v Elementos La primera 
acepta como parámetro un entero indicando el número de anotación a modifi¬ 
car o leer, mientras que la segunda, sólo de lectura, facilita el numero máximo 
lie anotaciones que podemos tener. 


Class Anotaciones 

Prívate Panotacion() As String 


Public Sub New\ByVal Elementos As Integer) 

ReDitn Panotacion [ El eméritos - 1} 

End Sub 


Public Property Anot.ac ion ( ByVal Índice As Integer) As String 

Get ’ devolvemos la anotación 
Return Panotacion(Indice) 

End Get 

Set(ByVal Valué As String) 

Panotacion{Indice) - Valué 

End Set 
End Property 


Public ReadOnly Property Elementos!i As Integer 
Get 

Return Panotacion .Get l.ength ( 0 ) 

End Get 
End Property 
End Class 


Observo quo los objetos de esta cíase pueden ser usados para almacenar cual¬ 
quier numero de anotaciones, va que dicho numero se establece dinámicamente 
en el momento de creación del objeto. I n el siguiente Ir.igmenlo, por ejemplo, 
se permite al usuario indicar el número de anotaciones que va .1 efectuar. Iras 
lo cual si* le piden los datos v. linalmente, se enumeran. 



Dim MisAnotaciones As Anotaciones 
Dim Indice As Integer 
Dim Anotación As String 


’ !'•**«• i .1 i» t i 

Consolé.Writ«("¿Cuántas anotaciones quieres efectuar? :") 
Indice ** Convet't. Tol nt 32 ( Consolé . ReadLine () ) 

MisAnotaciones = New Anotaciones(Indice) 

• >i - • ;r ' . .< /Vt .; I» I í i ...» 

Consolé.Writel.ine("Introduce anotaciones y pulsa <Intro>") 

For Indice = 0 To MisAnotaciones.E1ementos - 1 
Anotación » Consolé.ReadLine 
MisAnotaciones.Anotación(Indice) = Anotación 

Next 


Consolé . WriteLine { "-" ) 

Consolé.WriteLineí"ANOTACIONES EFECTUADAS") 

For Indice - 0 To MisAnotaciones.Elementos - 1 

Consolé.WriteLine(MisAnotaciones.Anotación!Indice)) 

Next 
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Figura 8.2. Resultado de la ejecución del código de ejemplo 


La propiedad por defecto 

loda clase de componente puede disponer de una propiedad por delecto, 
una propiedad cuyo nombre no tiene que introducirse explícitamente detrás 
del punto y el nombre de los objetos para poder acceder a ella. I sla posibilidad 
es especialmente interesante cuando se convierto en propiedad por delecto una 
que acepta parámetros, va que simplifica algo la notación final. 

Para indicar que una determinada propiedad será la propiedad por defecto 
basta con usar el modificador Default. C omo puede suponer, tan sólo pode¬ 
mos utilizarlo una ve/ por clase dado que no pueden existir varias propieda- 






dos por defecto. lomando como base la clase usada como ejemplo en el punto 
anterior, podríamos modificar la definición de la propiedad Anotación para 
dejarla asi: 

Default Public Property Anotación(ByVal Indice As Integer) 

As String 

Get 

Return PanoiacionfIndice) 

End Get 

Set(ByVal Valué As String) 

Panotacion(Tndice) - Valué 

End Set 

End Property 

Como se aprecia, la única diferencia esta en la cabecera de la propiedad: la 
palabra Default aparece al principio. Lo demás permanece igual. Ahora, al 
acceder a la propiedad Anotación de un objeto Anotaciones podríamos es¬ 
cribir lo siguiente: 


Consolé.WriteLine(MinAnot aciones (T nd i ce ) ) 

I n lugar de: 

Consolé.WriLeLine(MisAno tac iones.Anotación(1ndice) i 

No cabe duda de que la notación es mas clara y breve. 


Delegados y eventos 


Que un programa cree un objeto de una cierta clase y efectúe llamadas a sus 
métodos es algo niuv usual, tanto que no pensamos en el mecanismo utilizado 
para enlazar la aplicación con el método de la clase. Cuando lo que se necesita 
es justamente 1“ contrario, que sea el objeto quien llame a un método del pro¬ 
grama que lo ha creado, entonces si que nos paramos a pensar. I ste tipo de lla¬ 
madas, inversas a Lis que hemos efectuado hasta ahora, se conoce habilualmetile 
como ttillbtuk o de retorno. 

Los entornos de programación \ isuales ti RAL), como Visual Basic, introdu¬ 
jeron hace tiempo el concepto de evento, entendiendo como tal una señal gene¬ 
rada por un objeto o componente. I’.sta señal puede conectarse a un gestor ile 
evento, un método que se ejecutaría automáticamente al recibir esa señal C ada 
evento tiene una cierta firma o tipo que determina los parámetros que le acom¬ 
pañan. 

I n Visual Basic 6.0 v anteriores, no obstante, todo este mecanismo queda 
oculto para el programador. 

tu Visual Basic .NT I , para definir el tipo de un evento si* define un ttele$iulo. 
que no es más que una declaración en la que se asigna un nombre a ese tipo v se 
facilita la lista de parámetros. Suponiendo que fuésemos a crear un componente 



que generase periódicamente un evento, como si fuese un tic de reloj, podría¬ 
mos definir el delegado siguiente: 

Public Delegate Sub OnTickReloj( 

ByVal Ticks As Integer) 

Fíjese en que, de no ser por la palabra clave Delegate, esta declaración es 
idéntica a la de la cabecera de inicio de cualquier método. 

Cualquier clase que desee generar un evento de este tipo definiría un cam¬ 
po usando la palabra clave Event seguida del tipo de delegado y el nombre 
que tendrá el evento en dicha clase. En el fragmento siguiente, por ejemplo, la 
clase Reloj contaría con un evento llamado Tick del tipo OnTickReloj lis¬ 
to significa que dicho evento irá acompañado de un parámetro entero que st* 
facilitará al gestor que desee recibirlo. 

Public Class Reloi 

Event Tick As OnTickReloj 

Esta misma clase, Reloj, cuando quisiera generar el evento se limitaría a 
utilizar la instrucción RaiseEvent seguida del identificado!*, Tick en este ca¬ 
so, v, entre paréntesis, la lista de parámetros que tenga que facilitarse. 

I a parte complementaria a la clase que genera el evento es la clase que lo re 
abe. disponiendo para ello un gestor de evento apropiado con la lista de pará¬ 
metros que corresponda. Para asignar el evento se usa la sentencia AddHandler, 
como puede verse en el siguiente programa completo. En él la clase Reloj ge¬ 
nera el evento Tick descrito, que es recibido por la clase Aplicación En 
principio se llama al método Inicio( ) sin haber asignado un gestor de «‘ven¬ 
tos, por lo que el evento Tick en realidad no llega a producirse. A continua¬ 
ción se efectúa dicha asignación y se llama de nuevo a Inicio( ). 

Public Delegate Sub OnTickReloj| 

ByVal Ticks As Integer) 


Public Class Reloj 

Event Tick As OnTickReloj 


Public Sub New() 
End Sub 


Public Sub Iniciot) 

Dira Ahora, Segundo As DateTime 


Ahora * Now 
Segundo * Now 



Do While Now . Subtract (.Ahora ) .M i imt.es 1 


If Now . Subt tdCt ( Segundo ) . Si»ronds l Then 

RaiseEvent T ick ( Now. Subtract ( Alior a ) . Spconds ) 
Sequndo - Now 

End I f 
Loop 
End Sub 
End Class 


Class Aplicación 

Sub Hew( ) * creamos un i&loj 

Dim MiReioJ As Reloj New Reloj() 


Conso Le.WriteL ¿ne< 

"Antes de asignar el qestor de evento") 
MlPeloj.Tnic Lo() 


AddHandler Mi Re 1 o j.Tick, 

New OnT LckRelo i ( AddressOf Ti c l: Re 1 o j ) 
Consolé.WriteLinel 

"Después de asignar el qestot de evento") 
M i Re 1 o j . t n ic í o ( ) 

End Sub 


Sub 1'ickRelO ] ( ByVal Tic k s As Integer) 

Console.WriLeLine(Ticks) 

End Sub 

Shared Sub Mainf ) 

Dim Mi Apiicae ion As Aplicación 
New Aplicacionl) 

End Sub 
End Class 

Observe comí» su usa ul operador AddressOf para ohlunur l«i direci ion du 
un objeto du una clase. un osle caso o] método TickReloj tic Ij t laso Aplica¬ 
ción. v facilitarla como parámetro para crear el nuevo postor du exento 


Definición implícita de I delegado 

I os deludidos pueden utilizarse en dix ursos t onlexlos \ a i|ue pueden alnjai 
Id direc i ion du cualquier método de cualquier clase, independientemente du que 
este asociado a un objeto o sea un método compartido C liando la definición 
del delegado su clcclua e\clusi\ ámente para serx ir como tipo baso du un even¬ 
to, tal como en el ejemplo del punto anterior, podemos ahorrar algo de trabajo 



dejando que sea la propia sentencia Event la que efectúe implícitamente la de¬ 
finición de dicho delegado. 



l omando como punió de partida el ejemplo anterior, podríamos eliminar la 
definición del delegado v modificar la del evento dejándola asi 

Event Tick(ByVal Ticks As Integer) 

I ii lugar de indicar el tipo del ex ento, como hacíamos antes, ahora espcciti 
camos la lista de parametros que llevará asociada. Dado que no existe el tipo 
de delegado, la sentencia en que se anadia el controlador de ex ento quedaría 
ahora de la siguiente forma: 

AddHandler MiReloj.Tick, AddressOf TirkReloj 

Al igual que ocurre en la declaración del evento, en esta sentencia se crea 
implícitamente un objeto derivado de System. Delegate, del que derivan to¬ 
dos los tipos de delegado, v se asocia con la dirección del método TickRelo j. 

I I resultado final, tras efectuar los cambios indicados, es exactamente el 
mismo, pero el código resulta algo más breve y posiblemente mas claro. 


Asociación entre eventos y controladores 

l.a asociación entre un determinado evento y su controlador o gestor, esta¬ 
blecida mediante AddHandler, no tiene por que ser perenne. I n cualquier mo¬ 
mento podemos disociar esos elementos, evento y controlador, utilizando la 
instrucción RemoveHandler. 



I us parámetros necesarios son exactamente los mismos: el evento v la direc¬ 
ción del método. 

RemoveHandler MiReloj.Tick , AddressOf TxckRelon 

I sla sentencia, por ejemplo, desactivaría la llamada al melodoTickRelo j ( ) 
cada ve/ que se produjese el evento Tick del objeto MiReloj. 

l eiste una alternativa al uso de AddHandler para establecer la conexión 
entre un evento de un objeto y un método de otro, consistente en declarar la 
variable de ese objeto con la clausula WithEvents, palabra clave va existente 
en versiones previas de Visual Basic. Declarada la variable usando ese modifi¬ 
cador. es posible utilizar la palabra Handles al final de cualquier método para 
asociarlo con el evento. 


Nota 

La cláusula WithEvents no puede usarse en variables locales a un méto¬ 
do. por lo que para usarla debe cambiar el ámbito de la variable MiReloj 
sacándola del constructor y dejándola al nivel de la clase Aplicación. 


Volviendo ele nuevo sobre el mismo ejemplo anterior, podríamos modificar 
la clase Aplicación dejándola como puede verse a continuación. Ahora el 
evento se gestionaría en el método TickRelo j desde un primer momento, sin 
necesidad de utilizar AddHandler 

Class Aplicación 

Dim WithEvents MiReloj As Reloj New Reloj() 

Sub New( J 

M i Re 1 oj.t nicio(> 

End Sub 


Sub TickReloj(ByVal Ticks As Integer ) Handles MiReloj.Tick 

C'onsole.Wr i te!, i ríe ( Ticks ) 

End Sub 

Como verá en capítulos posteriores, «il usar diseñadores como el de lormu- 
larios Windows se generará automáticamente el código necesario para enlazar 
los eventos y sus correspondientes gestores usando WithEvents v Handles. 
en lugar de AddHandler. 

Otros usos de los delegados 

Como se apuntaba anteriormente, los delegados no solo son útiles para de- 
linir eventos, siendo también aplicables en escenarios en los cuales se precisa 




la dirección de una Junción con el fin de invocarla sin conocer su identificador 
de antemano. En este contexto, y en lenguajes como C-h-, se usan los punteros 
a funciones. El inconveniente es que los punteros no suelen conservar ni com¬ 
probar información de tipos, de tal manera que un puntero puede utilizarse 
para llamar de manera incorrecta a una función. 

Los delegados de Visual Basic .NET son unos objetos derivados de la clase 
System. Delegate y cuentan con una fuerte comprobación de tipos, es decir, 
no son meros punteros a funciones. Estos delegados, además, pueden tener 
conexión con múltiples destinos en lugar de con uno sólo. Usando un delegado 
es posible, por ejemplo, codificar implementaciones genéricas de procesos que, 
de otra manera, requerirían mucho más trabajo. 

Suponga que tiene que codificar un proceso consistente en recuperar una 
serie de datos, tratarlos v mostrarlos por la consola. En unas ocasiones esos da¬ 
tos vendrán desde la consola, en otros desde un archivo, en otros de un arreglo 
constante de valores, en otros de un servidor de Internet, etc. En lugar de im- 
plementar un proceso específico para cada caso, que podría ser nuestra prime¬ 
ra idea, podríamos optar por una implementacíón genérica: 

Public Shared Sub Procesa(ByVal FSolicitud As SolicitaDato) 

Dim Datos(4) As String 
Dim Indice As Integer 


For Indice = 0 To 4 

Datos(Indice) • FSolicitud() 

Next 


For Indice = 0 To 4 

Console.WriteLme(Datos( Indice) ) 

Next 
End Sub 

Como puede ver, para solicitar los datos se invoca como función al parametro 
FSolicitud, de tipo SolicitaDato. Se trata de un delegado definido pre¬ 
viamente asi: 

Public Delegate Function SolieitaDato() As String 

Para poder invocar a Procesa ( ), por tanto, os necesario facilitar como pa¬ 
rámetro la dirección de una función que retorne una cadena De dónde la ob¬ 
tenga no es importante. El método Procesa ( ) teóricamente lendría que tratar 
los datos, si bien en este caso nos limitamos a mostrarlos por la consola tal v 
ionio los recuperamos. 

Completemos el código anterior definiendo una clase que, además de Pro¬ 
cesa ( ). cuente con otros dos métodos compartidos: SolicitaTeclado ( ) v 
SolicitaConstante { ) El primero de ellos devuelve un dalo solicitado pol¬ 
la consola, mientras que el segundo lo obtiene de un arreglo constante de ca¬ 
denas. 



Public Delegate Function SóllCitaDaLo() As String 


Public Class ProcesaDutos 


Public Shared Sub Procesa lByVal FSolicitud As Soiicitu Data ) 
Dim Datos(4) As String 
Dun Indice As Integer 


For Indice s 0 To 4 

Datos(1nd j ce) FSolicitud() 

Next 


For Índice ~ 0 To 4 

Conso le . WnteLine ( Datos ( Indice) ) 

Next 
End Sub 


.« - • «la »*o •• <j 

Public Shared Function Sol ici taTecladoí ) As String 

Consolé. Wr i te ( M T ni reduzca un dato: **) 

Return Console.ReadLine{) 

End Function 


Public Shared Function So I i r i l.aCons t ant e {) As String 
Static Contador As Integer =* -1 
Dim Vaiores() As String * _ 

{"tuero", "Febrero", "Margo", "Abril", "Mayo") 


Contador * lif {Contador - Va 1 ores . Get. UpperBound ( 0 ) , 

0, Contador + t) 

Return Va lores(Contador) 

End Function 

End Class 

Al ser compartidos los tres métodos de esta clase, ivo es necesario crear un 
objeto para poder invocarlos. Como se ve en el código siguiente, basta con an¬ 
teponer el nombre de la clase para ejecutarlos I I resultado de la ejecución es el 
mostrado en la figura N A 

ProcesaDatos.Procesa(AddressOf ProcesaDatos.SolicitaTeclado) 

ProcesaDatos.Procesa{AddressOf ProcesaDalos.SolicitaConstante) 

Componentes .NET 

l as propiedades v los eventos, conjuntamente con los elementos que se des¬ 
cribieron en el capitulo previo, tienen, básicamente, un objetivo: lacilitar la 



creación de componentes reutilizables. Los ejemplos propuestos hasta ahora 
no muestran este objetivo va que su finalidad es meramente demostrativa l o 
primero que hay que hacer es identificar las lunciones que van a necesitarse de 
manera repetitiva durante el desarrollo de un proyecto para, a continuación, 
implementarlas en lorma de componentes, listos pueden ser genéricos o bien 
componentes específicos para aplicaciones Windows o Web. 


a F:\DatosTrabaJo\Ubros\Actuales\PBVisualBasteNET\Ejemplos\... - oj*| 



Figura 8.4. Parte de los datos se solicitan por consola 


F.n capítulos posteriores nos ocuparemos con profundidad del desarrollo 
de componentes de todo tipo. No obstante, veamos brevemente romo conver¬ 
tir en componente genérico una de las clases usadas previamente como ejem¬ 
plo, con leves modificaciones, y como usarlo desde tina aplicación Windows v 
otra de consola. 

Clases y componentes 

I os componentes son objetos creados a partir de una clase, como cualesquie¬ 
ra otros F.xisten, sin embargo, algunas diferencias que permiten que esos obje¬ 
tos puedan ser manipulados de manera visual en un entorno como el de Visual 
Studio NI I, diferencias que encontramos en la interfaz IComponent. lista 
debe ser implementada por cualquier clase que pretenda servir como base pa¬ 
ra la creación de componentes. 

(n lugar de implementar manualmente IComponent, podemos crear una 
nueva clase de componente tomando como base la clase Component. Lsta, de 
finida en System. ComponentModel, facilita una implementación por defecto 
de IComponent. Simplemente con esto ya estamos en disposición de crear una 
clase de componente; Reloj Su finalidad la explicada anteriormente en un 
ejemplo: producir un evento periódicamente durante un cierto intervalo de 
tiempo. La única diferencia, como se aprecia en el código siguiente, es que tan¬ 
to la duración del proceso como el intervalo del evento son parámetros confi¬ 
gurables mediante sendas propiedades, hl código debe introducirlo tras iniciar 
una nueva biblioteca de clases Nb Y, tal y como se hace en la figura KS. 
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Ayuda 


Figura 8.5. Los componentes NET se alojan en bibliotecas de clases 


Public Class Reloj 

Inherits System.ComponentMode 1 .Component 
Private Ptiempo, Pintervalo As Integer 


Public Event TickíByVal Segundos As Integer) 


Public Sub Newi) 
Ptiempo - 1 

End Sub 


i. • *•*».•• <t ¿ i i r <»i ..i. ifu» i XI ni* • I ...«••» 

Public Sub New(ByVal Tiempo As Integer) 

Ptiempo = Tiempo 

End Sub 


...i »,v «■»■•*■ 

Public Property Tierapo() As Integer 
Get 

Return Ptiempo 
End Get 

Set(ByVal Valué As Integer) 
Ptiempo * Valué 
End Set 
End Property 


/»: n/r - *i,i nr /■ » i t k' in . ,*» 'iuji - r • r . j ■ n 

Public Property Intervalo( ) As Integer 
Get 

Return Pintervalo 

End Get 

Set(ByVal Valué As Integer) 

Pintervalo * Valué 






End Set 
End Property 


me 


y > - oct*' 

Public Sub lnicio(') 

Dim Ahora, Secundo As DaLeTime 


Ahora » Now 
Segundo = Now 

ti Jtrtl rt-a ,.j. Ji'te 

Do While Now.Subtract(Ahora).Minutes < Tiempo 

a < t.i • - »í■ - 4 1 ;.r < . • • .1 * i» 

If Now.Subtract(Segundo).Seconds - Intervalo Then 

gy ** •■*.*% ‘ J > . 4 •'. . i •• 'i «.•*- 

RaiseEvent Tick(Now.Subtract(Ahora).Seconds) 

Segundo * Now - .* - * •* • ■ - ir 

End If 
Loop 
End Sub 
End Class 

Observe que la clase cuenta con dos constructores. F.l segundo es opcional, 
pero el constructor por defecto es indispensable si pretendemos que el com¬ 
ponente pueda ser manipulado visualmente en un diseñador A pesar de que 
Reloj deriva ahora de ComponentModel . Componente nada no> impide se¬ 
guir utilizando esta clase para crear componentes como lo hemos hecho hasta 
ahora, en los ejemplos previos del capítulo. 


Uso no visual 

I a clase Reloj, como acaba de decirse, puede seguir utilizándose de forma 
no visual, por ejemplo desde una aplicación de consola. Ps algo que ya sabe¬ 
mos cómo hacer 

F.l acceso a las propiedades es simple, y los eventos se conectan mediante 
AddHandler y AddressOf o bien mediante WithEvents y Handles I a úni¬ 
ca diferencia es que ahora no vamos a usar una clase definida en el mismo mo¬ 
dulo, sino un componente existente en una biblioteca externa. 

I ras iniciar nuestra aplicación de consola, lo primero que tenemos que ha¬ 
cer es pulsar el botón secundario del ratón sobre la carpeta de referencias que 
aparece en el Explorador de soluciones, seleccionando la opción Agregar refe¬ 
rencia del menú emergente hn la ventana que se abre tenemos dos alternati¬ 
vas usar la página.NET localizando el ensamblado que contiene el componente 
o, si tenemos abierto el proyecto de la biblioteca recién creada, recurrir a la pá¬ 
gina Proyectos. Fsto es lo que se ha hecho en la figura H.h, en la que se ha selec¬ 
cionado (d único elemento disponible. De esta forma tendremos acceso desde 
el nuevo provecto a los elementos existentes en Componentes que, en este ca¬ 
so concreto, es sólo la clase Reloj. 

Contando con esta referencia, el código necesario para crear el componente 
y utilizarlo no difiere mucho del de ejemplos previos. A continuación puede 



ver el código completo de uno aplicación consola simple que solicita la dura¬ 
ción y el intervalo v pone en marcha el proceso 


Module Module! 

Dim WittaEvents MiRelo] As Componentes.Re lo j 
Sub Main() 

Dim Tiempo As String 


Consolé.Write("Duración del proceso (minutos) :“> 
Tiempo * Consolé.ReadLlne() 

MiReloj = New Componentes.Re 1 oj(Tiempo) 

Consolé.Write("Intervalo para el evento (segundos) : n ) 
MiRel oí . Intervalo = Consolé . Readl.ine ( ) 

MiRelo j. lnicio() 

End Sub 


Private Sub Reloj_Tick{ByVal Segundos As Integer) 

Handles MiReloj.Tick 
Console.WriteLine(Segundos) 

End Sub 

End Module 

Kl resultado de la ejecución de este ejemplo es fácilmente imaginable \ no 
difiere demasiado del mostrado en la figura S.3. 



Figura 8.6. Añadimos en el proyecto actual una referencia a la biblioteca 
de componentes 












U 30 visual del componente 

Derivar la clase Reloj de Componen tModel. Component e introducirla en 
una biblioteca de clases no nos lia aportad».», aparentemente, ningún beneficio 
considerable I .o que ocurre es que al crear una aplicación de consola no dispo¬ 
nemos de un contenedor de componentes ni un diseñador para personalizarlos, 
elementos que si existen, por ejemplo, en las aplicaciones Windows. Por ello 
vamos a iniciar un provecto de* esto tipo v dar los pasos que se describen en los 
parra los siguientes 

I ras iniciar el nuevo proyecto nos encontramos con un formulario vacio, el 
contenedor, rodeado de elementos como el Cuadro de herramientas »» la \ enta 
na Propiedades, que* forman parle del diseñador. Pulsamos el botón secunda¬ 
rio del ratón sobre el Cuadro de herramientas v luego seleccionamos la opción 
Personalizar Cuadro de herramientas. F.n la ventana que aparece, concretamen¬ 
te en I«i pagina Componentes de .NET Eramework (véase figura S.7), pulsamos 
el bolón Examinar \ seleccionamos el ensamblado que contiene el componente 
Reloj. Dicho ensamblado aparecerá en la lista v podremos seleccionarlo. 
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Figura 8.7. Añadimos el componente al Cuadro de herramientas 


Ahora el componente Reloj aparecerá en el Cuadro de herramientas, en 
nuestro caso, como puede verse en la figura 8.K, en la pagina Componentes 
Podemos seleccionarlo, con el botón principal del ratón, y soltarlo sobre el con¬ 
tenedor, que en este c aso es el formulario. La operación puede repetirse tantas 
veces como necesitemos, creando múltiples componentes de la misma clase». I I 
diseñador asignara automáticamente un nombre para cada uno de ellos. 

La personalización del componente, estableciendo valores para las propie¬ 
dades Intervalo v Tiempo, puede efectuarse como hasta ahora, mediante 
código, o bien sirviéndonos de la ventana Propiedades, teniendo elegido un 
componente Reloj dicha ventana mostrará todas sus propiedades. En la li- 
gura su hemos seleccionado que durante un tiempo de I minuto se genere el 




evenlo cada 2 segundos. De osla turma efectuamos de manera visual un traba¬ 
jo que, hasla ahora, requería la codificación de al monos dos sentencias. 



Figura 8.8. Nuestro componente aparece en el Cuadro de herramientas 



Figura 8.9. Las propiedades del componente aparecen en la ventana 
Propiedades 


también la asociación entre el evento Tick del componente y el método 
que actuará como controlador de dicho evento puedo establecerse automática¬ 
mente. Para ello accedemos al edilor de código y, de las listas que hav en la 
parte superior, seleccionamos Reloj 1 en la de la izquierda y el evento Tick 
de la de la derecha, listo provocará la inserción del correspondiente método 
controlador del evento, de tal manera que tan solo tenemos que añadir el códi¬ 
go que corresponda. 
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Figura 8.10. Seleccionamos el evento que queremos controlar 


Para finalizar nuestro programa tan sólo rosta la inserción de algún compo 
nonti* mas m el lormulario, concretamente unas cajas de le\lo \ un botón. v la 
inserción del código siguiente asociado al evento Click del ratón v el evento 
Tick del control Reloj . 

Prívate Sub Buttonl_Ciick| 

ByVal sender As System.Übject, 

ByVal e As System.RventArgs) Handles Button1.CLick 
Re I oj t.ínicio{ > 

End Sub 

Prívate Sub Reloj] Tick( 

ByVal Sequndos As Integer) Handles ReLojl.Tick 
TexLBoxl.Text * Segundos 
Me.Update() 

End Sub 

I n realidad nosotros sólo escribiremos las sentencias ejecutables, dado que 
las cabeceras v pies do los métodos son generados automáticamente por ol di 
soñador. Finalmente, tendremos un programa que. al ser ejecutado, mostrara 
una ventana similar a la de la figura S I I Pn la primera caja do texto introduci¬ 
mos la duración v en la segunda ol intervalo del oven lo, duran le ol mal se mos¬ 
traran 1 os segundos transcurridos en la primera de las cajas. 



Figura 8.11. El programa en ejecución 


Nota 

A diferencia de otros componentes, como las cajas de texto o los botones, 
el componente Reloj no tiene una parte visual. Por ello al insertarlo en el 
formulario verá que no aparece en su interior, sino en la parte inferior del 
diseñador. 



Puntos clave 


• Cualquier t lase puedo contar, además de < on métodos \ miembros de da¬ 
tos, con propiedades, delegados \ eventos 

• Las propiedades se útil i/an externamente como si fuesen variables pero, 
en realidad, tienen asociados métodos de asignación v leí tura que contro¬ 
lan el proceso. 

• Una propiedad puede ser sólo de lectura (ReadOnly). sólo de escritura 
(WriteOnlyJ o de lectura v escritura, según las operaciones permitidas. 

• Cada clase puede contar con una propiedad por detecto (Def ault), cuvo 
nombre no es necesario especificar para leerla o modificarla. 

• Un delegado es un tipo de dalo similar a un puntero a una función pero 
con comprobación de tipos, puede usarse para funciones de tipo callback 
v definición de eventos. 

• Mediante la palabra clave Event se definen los eventos con que contara 
una clase, generándolos mediante RaiseEvent. 

• La conexión entre un evento, producido por un objeto, v el método que lo 
recibirá, en otro objeto, puede establecerse mediante AddHandler o bien 
declarando el primer objeto con Wi thEvents v añadiendo al método que 
lo recibe el modificador Handles. 

• Cualquier i lase derivada de ComponentModel .Component, que facilita 
una implemenlacion por defecto de la interfaz IComponent, puede mani¬ 
pularse visualmente en un diseñador de Visual Basic NLT 


Resumen 

I I contenido de este capitulo, conjuntamente con el del «interior, nos ha apor¬ 
tado toda la inlormacion necesaria para poder definir nuestras propias clases 
de objetos \ componentes, definiendo miembros de datos, métodos, propieda¬ 
des, delegados y eventos Visual Basic Nb I dispone de un importantísimo nu¬ 
mero de clases de objetos \ componentes que disponen de dichos elementos, 
c lases que usamos creándolas desde código o bien de manera visual como se 
verá en capítulos posteriores. 

I <i mavor utilidad del conocimiento adquirido, no obstante, la encontramos 
al definir nuestras propias clases. I n ocasiones éstas se irán definiendo automá¬ 
ticamente, por ejemplo til añadir un formulario Windows a un proyecto e in 
seriar componentes en su interior mientras que en otras prácticamente todo el 
trabajo sera manual, como al desarrollar nuevos componentes v controles. 

I n lodo caso sr trata de* conceptos indispensables para poder desenvolver¬ 
nos cómodamente en este Visual Basic orientado a objetos, conceptos que, ade¬ 
más, liaran mucho mas fácil la comprensión de otros lenguajes, como C* o |# 







9 

Programación 

concurrente 


Si pusiésemos en una lista las características que, durante años, los progra¬ 
madores han pedido añadir a Visual Basic 6, sin duda uno de los primeros 
puestos estaría ocupado por el tema que abordamos en este capítulo: la crea¬ 
ción de componentes y aplicaciones que ejecuten de manera concurrente varias 
tareas, lo que se conoce habitualmente como aplicaciones con múltiples hilos 
de ejecución o nwllühmut. Aunque existente en Visual Basic 6, esta capacidad 
se limita tan sólo a componentes con unas propiedades muy concretas y bas¬ 
tantes limitaciones. 

Visual Basic .NET, al igual que el resto de los lenguajes integrados en Visual 
Studio .NFT, puede crear libremente los hilos de ejecución que necesite. Todos 
los elementos necesarios se encuentran en el ámbito System. Threading. co¬ 
mo podremos ver en este capítulo, l a gestión de múltiples hilos, no obstante, 
plantea también nuevas dificultades como la sincronización a la hora de acce¬ 
der a datos comunes a varios hilos. El estudio de estos problemas es uno de los 
objetivos que abordamos de inmediato 


Aplicaciones de la concurrencia 

Que exista la posibilidad de crear y utilizar múltiples hilos de ejecución no 
implica que necesariamente tengamos que hacerlo, de igual manera que no uti¬ 
lizamos un bucle o un condicional por el simple hecho de que sean construccio¬ 
nes del lenguaje, sino que lo hacemos siempre a causa de una cierta necesidad. 







Mientras desarrollamos una aplicación, por tanto, no tenemos que pensar don¬ 
de podemos aplicar el uso de varios hilos concurrentes, más bien lo contrario, 
este hecho debe surgir como una necesidad. 

I lav que tener en cuenta que el rendimiento de una aplicación, en contra de 
la ^ reencia general, es inversamente proporcional al número de hilos de ejecu¬ 
ción concurrentes que utilice. F : .s decir, a más hilos de ejecución en paralelo 
peor rendimiento general f's fácil de comprender estableciendo un simple pa¬ 
ralelismo entre la herramienta que efectúa el trabajo, que es el procesador que 
hay en el ordenador, v cualquier otra herramienta con la que esté habituado a 
trabajar Suponga que tiene que hacer varios agujeros en una pared utilizando 
una máquina taladradora. ¿Cómo tardara menos, haciendo un agujero entero 
detrás de otro o cambiando cada segundo de un agujero a otro continuamente 
hasta tenerlos terminados los tres? lista claro que el segundo método requerirá 
mas tiempo por el simple hecho de tener que detener la máquina v cambiar de 
un agujero a otro muchas mas veces cié las necesarias, aunque al final, aparen¬ 
temente, terminemos todos los agujeros al mismo tiempo. 

Cuando la tarea de un programa se divide en varias partes concurrentes 
ocurre prácticamente lo mismo, siempre hablando de sistemas en los que tan 
sólo existe un microprocesador, l-.sle emplea parte do su tiempo en cambiar do 
un hilo a otro, tiempo que no puede dedicar a la ejecución de la tarea que es 
realmente lo importante. 

I ras leer esta exposición seguramente se preguntará para que le puede 
servir entonces la creación de uno o más hilos de ejecución concurrente, va que 
parece no tener parte positiva. Lo explicado hasta ahora ha tenido como objeti¬ 
vo hacerle pensar un momento antes de decidir la utilización de varios hilos 
pero, como puede suponer, esta posibilidad tiene aplicaciones muy claras. Una 
tic ellas se aplica especialmente a aquellos programas que cuentan con una in¬ 
terfaz de cara al usuario, típicamente una ventana, que no debe dejar de res 
ponder a causa de la puesta en marcha de un proceso más o menos lento. Lse 
proceso debería ejecutarse en un hilo de ejecución independiente, sin afectar a 
la mencionada interfaz. 

Otro caso claro en el que se necesita el uso de este recurso es en las aplica 
ciones de servidor que deben atender simultáneamente a multitud de clientes 
I o habitual es que a medida que van recibiéndose solicitudes se lancen hilos 
de ejecución para atenderlas, independientes para cada cliente. ¡Isla técnica 
evita que cada cliente tenga que esperar hasta que la solicitud del anterior tina 
fice, lo cual podría dar la sensación de falta de respuesta por parle del serv i¬ 
dor Aunque el rendimiento global podría ser inferior, usando múltiples hilos 
lodos los clientes tienen la impresión de que se les atiende de inmediato. 

Exceptuando los dos casos indicados, los más corrientes, \ alguno más con¬ 
creto, el uso de la concurrencia no suele ser una buena idea en la gran mayoría 
de* los provectos. 

Ahora que sabe esto, dediquemos el resto del capitulo a aprender a utilizar 
múltiples hilos de* ejecución. Los ejemplos propuestos son en su mayoría muy 
sencillos, no representando los casos en los cuales se necesitaría realmente una 
ejecución concurrente de varias tareas. 



Nota 

En el capítulo anterior se usó como ejemplo una clase que simulaba un reloj 
generando un evento a intervalos. Mientras el método estaba ejecutándose 
el resto de la aplicación quedaba totalmente detenida. Utilizando un hilo de 
ejecución independientemente podríamos conseguir que el evento Tick 
se produjese de manera asincrona, tras devolver el método inicia < ) el 
control al código que le hubiese invocado. 


Aplicaciones, hilos y prioridades 

bn 1*1 tercer capítulo se introdujeron múltiples conceptos relativos a la pla¬ 
taforma Microsoft .NbT, entre ellos el del dominio de aplicación. Todos los 
provectos desarrollados con Visual Basic Nli I se ejecutan en el contexto de un 
dominio de aplicación, contexto representado por un objeto de la dase App- 
Domain Podemos recuperar el dominio de aplicación actual mediante la pro¬ 
piedad compartida CurrentDoma in. Con las propiedades v los métodos de 
AppDomain es posible recuperar información de contexto, abrir nuevos ensam¬ 
blados, ejecutarlos, etc. 

Cuando se crea un dominio de aplicación y se abre un ensamblado, para ini¬ 
ciar la ejecución do un programa, se crea y pone en marcha un hilo de ejecución 
o fhraul. Éste es el hilo de ejecución principal v, a menos que creemos otros de 
manera explícita, único con el que contará la aplicación. Mediante la propie¬ 
dad compartida CurrentThread de la clase Thread podemos recuperar una 
referencia al objeto que representa a ese hilo principal. 

I a ejecución de un nuevo hilo concurrente consiste, básicamente, en la crea¬ 
ción de un nuevo objeto de la clase Thread, su asociación con el método que 
contiene el código a ejecutar y la puesta en marcha mediante el método Start( ). 

La clase Thread 

l£l ámbito System. Threading es el contenedor en el que podemos encon¬ 
trar todas las clases e interfaces relacionadas con la programación concurrente 
en Visual Basic .NhT, entre ellas la clase Thread. I sla encapsula todos los re¬ 
cursos necesarios para gestionar un hilo de ejecución: creación, puesta en mar¬ 
cha. pausa, reanudación v detención l.a clase Thread es de uso final, es decir, 
no puede ser utilizada como base para crear otras nuevas. 

Mediante las propiedades de la clase Thread podemos saber si el hilo está 
o no ejecutándose, si lo hace en segundo plano o cual es su prioridad, mientras 
que mediante los métodos se habilitan funciones como la puesta en marcha, 
suspensión temporal, interrupción o enlace con otro hilo de ejecución. I .os me¬ 
canismos de sincronización, algunos de los cuales conoceremos después, no 
forman parte de la clase Thread sino que aparecen como objetos independien¬ 
tes de otras clases del ámbito System. Threading. 




Para croar un objeto do la clase Thread os necesario, asi lo requiero el único 
constructor disponible, entregar un parámetro de tipo ThreadStart. Dicho 
tipo se encuentra definido en el mismo ámbito System.Threading de la si¬ 
guiente manera: 

Public Delegate Sub ThreadStart() 

Como puede ver se traía de un delegado, concretamente una reíerencia a un 
procedimiento que no loma parámetros. Al crear un objeto Thread, por tanto, 
deberemos entregar como parámetro la dirección de un método que se ajuste a 
la definición de ese delegado: 

Dim MiHilo As Thread a New Thread (AddressOf MÍMetodo) 

Public Sub MiMetodof) 

End Sub 

I n este caso el objeto MiHilo, que representa un hilo de ejecución, está aso¬ 
ciado al método MiMetodo( ). Cuando el hilo se ponga en marcha ejecutara el 
código que exista en ese método. 

Puesta en marcha del nuevo hilo 

La creación de un nuevo hilo de ejecución no implica la ejecución inmediata 
del código asociado, contenido, como acaba de decirse, en el método cuya di¬ 
rección se entrega como parámetro al constructor de la clase Thread I a poes¬ 
ía en marcha del nuevo hilo es un proceso independiente, cié tal manera que 
podemos crear tantos hilos romo necesitemos dejándolos en espera lusla el 
momento en que nos interese ejecutarlos. 

bn la definición de la clase Thread encontramos métodos como Start( ), 
Suspend ( ) , Resume ( ) v Abor t { ) . Su propio nombre denota la tuncionalidad 
poner en marcha el hilo de ejecución, suspenderlo temporalmente, reanudarlo 
o bien detenerlo de manera definitiva. Mediante la propiedad solo de lectura 
ThreadState podemos conocer el estado actual del hilo. Dicha propiedad 
contendrá uno de los valores enumerados en la tabla M I. También podemos 
servimos de propiedades como IsAlive o IsBackground, que devuelven 
True en caso de que el hilo esté en ejecución o desempeñe su tarea en segundo 
plano, respectivamente. 

Tabla 9.1. Valores de la enumeración ThreadState 

Valor Estado del hilo 

Aún no se ha puesto en marcha 
Esta ejecutándose 

Se ha solicitado su detención temporal 


tinstarted 
Rtmn i ng 

SuspendRequested 




Valor 


Suspended 
StopRequested 
Stopped 

AbortRequested 
Aborted 
WaitSleepJoin 
Background 


Estado del hilo 

Se encuentra detenido temporalmente 

Se ha solicitado su detención 

Se encuentra detenido 

Se ha solicitado su interrupción 

Interrumpido 

Se encuentra bloqueado o en espera 

Está ejecutándose como hilo en segundo plano 


I ros croar el objeto Thread, por tonto, lo único que necesitamos poro poner 
en marcho lo ejecución del hilo es llamar a) método Start< ). Éste devolverá el 
conlro] de manera inmediata, de tal forma que el hilo de ejecución principal 
puedo continuar con su trabajo. Mientras tanto, el nuevo hilo hará su trabajo 
en paralelo, al menos aparentemente. 


Enumeraciones concurrentes 

Tara ver en la práctica lo aprendido hasta ahora vamos a servirnos de un 
ejemplo simple pero demostrativo. En el pondremos en marcho dos hilos de 
ejecución adicionales al principal, cada uno de ellos efectuando una enumera¬ 
ción Como en los capítulos anteriores, continuaremos utilizando el asistente 
para aplicaciones de consola con el lin de centrarnos en la funcionalidad del 
ejemplo olvidándonos de tareas de diseño. I o primero que haremos es definir 
uno clase en lo que existen varios métodos encargados de enumerar valores 
por la consola. En el ejemplo siguiente puede ver que existen dos métodos: uno 
muestro una sucesión de números y otro una secuencia de caracteres 


Public Class Enuinerae iones 

Public Sub Números () 

Dim Contador As Integer 

Por Contador - 1 To 1000 

Console.Wri te{"{0} { l>”, Contador, vbTab) 

Next 
End Sub 


Public Sub Letras{) 

Dim Letra As Integer 

For Letra * 1 To 255 

Consolé.Write0>{1} M , Chr(Letra), vbTab) 

Next 
End Sub 
End Class 





Conloes habitual, podemos crear un objeto de esta clase e invocara sus mé¬ 
todos directamente, como hemos hecho con muchos otros objetos en ejemplos 
previos. I I resultado es que al llamar a un método, por ejemplo Números ( ). 
sera el lulo principal el que entro a ejecutarlo, de tal forma que no se devolverá 
el control hasta que Números ( ) I i nal ice leu i endo esto en cuenta es fácil supo 
ñor el resultado de las sentencias siguientes: 

Din Mi«Enumeraciones As New Enumeraciones() 

Miütífiumerae i onea . Números j } 

MisEnumeraeiones.Letras() 

Con so I e . Wr i teLin*» ( " Fi n del método Mainí)") 

Al ponerse en marcha el programa se inicia el hilo principal de e|ecucmn. 
que será el ein argado de procesar estas sentencias, t liando se llegue a M i sEnu- 
merac iones . Números ( ) dicho hilo pasara a ejecutar las senlem i as «.leí méto¬ 
do Números ( ), finalizado el cual volverá al cuerpo principal del programa v 
ejecutara M i sEnumeraciones .Letras (). Resumiendo: en la consola apa 
recera primero la serie de números, después la de caracteres \. finalmente, et 
mensaje Fin del método Main{). 

Muv distinto será el resultado que generaría el código siguiente 

Sub Mal til ) 

Dim Hi 1oNuraeros, ililoLetras As Thread 

Dim HisEimnierar iones As New Enumeraciones ( ) 

HiloNumeios New Thread<AddressOf MisEnumeraciones.Números i 
H] loterías = New Tíi t ead ( Add ressOf M i £ R ivu me taciones .l,ei ras) 

HiloNumeros.Start() 

H i I ote t ra s . S t a rt ( ) 


Conso I e . Wn teLine (" fin del método Ma i n ( ) “ ) 

End Sub 

AI ejecutar la sentencia H i i oN ume ros . St art ( ) el hilo principal pone en 
marcha otro hilo que será el encargado de ejecutar el i odigo de MisEnumera- 
cíones . Números ( ) . ocurriendo lo mismo con HiloLetras . Star t ( ) I I 
hilo principal, portante», queda totalmente libre tras poner en marcha los otros 
dos, de tal forma que el mensaje final aparecerá, generalmente antes de que 
los dos hilos independientes terminen su trabajo. I n la ligura 9.1 puede ser 
parle del resultado que genera la ejecución del programa. Lil primer hilo comien¬ 
za a mostrar números, tras lo cual loma el control el segundo v muestra algu 
nos i ar.it teres. I n ese momento el hilo principal llega a su im v loma de mies o 
el control el segundo de los hilos, después el primero v asi irán simultaneándose 
hasta que ambos terminen su trabajo. 




Figura 9.1. Cada hilo de ejecución va mostrando unos datos 


Codo ve/ que ejecuto el programo posiblemente veo un resultado distinto, 
vo que lo cadencia con lo que el sistemo cambio de un hilo de ejecución o otro 
depende de múltiples tactores. 

Prioridad de ejecución 

□ tiempo que el sistema cede el control o un hilo de ejecución, osi como lo fre¬ 
cuencia con que lo hoce, son tactores que dependen de lo prioridad de ejecu¬ 
ción que tenga ese hilo. Cuando se crea un nuevo hilo por defecto se le asigno 
uno prioridad normal, de tal formo que tiene el mismo tiempo de procesador que 
el hilo principal de lo aplicación. 

Podemos tonto establecer como determinar la prioridad de un cierto hilo 
mediante la propiedad Priority. Los valores que puede tener esta propiedad 
son los enumerados en lo tabla 9.2 Asignando el valor AboveNormal ol hilo 
HiloNumeros, por poner un ejemplo, conseguiremos que éste se ejecute más 
tiempo que los demás de la aplicación. Si le asignásemos el valor BelowNorma 1, 
por el contrario, el tiempo asignado seria inferior. 

Tabla 9.2. Posibles valores para la propiedad Priority 

Valor Prioridad 

Normal La establecida por defecto Prioridad media de todos los hilos 

en el sistema 


AboveNorma1 


Por encima de la normal (más tiempo dedicado al hilo) 





Valor 


Prioridad 


Highest La más alia (el mayor tiempo posible dedicado al hilo) 

BelowNorma 1 Por debajo de la normal (menos tiempo dedicado al hilo) 

Lowest La más baja (el menor tiempo posible dedicado al hilo) 

Puede hacer algunas pruebas simples modificando el valor de la propiedad 
Priority de HiloNumeros e HiloLetras antes de llamar a sus métodos 
Start( ). Dependiendo de los valores asignados vera que la salida por la con¬ 
sola cambia. 


Nota 

A pesar de que podemos asignar libremente la prioridad que deseemos a 
un objetoThread, no es recomendable el uso de los valoresAboveNormal 
y Highest, especialmente en varios hilos de manera simultánea dado que 
ello puede afectar al rendimiento global del sistema. Si es habitual, por el 
contrario, asignarBelowNormal o incluso Lowest a un hilo cuya tarea no 
es demasiado importante en cuanto al tiempo que se empleará en llevarla 
a cabo. 


Elementos de sincronización 

I «i mavoría do Lis aplicaciones que utilizan múltiples hilos de ejecución con 
currentes no son tan simples como el ejemplo anterior, do ahí que en «• 1 no en¬ 
contremos, de principio, los problemas que si se plantean en dichas aplicaciones. 
Lino de esos problemas, quiza el mas importante, es la sincronización entre hi¬ 
los de ejecución, especialmente a la hora de acceder a recursos que son compar¬ 
tidos entre varios de ellos o, incluso, todos. 

Suponga que tiene un componente de servidor que crea un hilo de ejecución 
independiente para cada cliente del que se reciba una solicitud, cliente al que 
se asigna un numero que, aunque no consecutivo, si debe ser único Debere¬ 
mos contar, por tanto, con una variable que almacene el ultimo índice usado, 
variable cuvo valor se incrementara al crear cada nuevo hilo tendríamos una 
variable compartida por todos los hilos, lo cual plantea un primer problema 

No vamos a diseñar un complejo componente de servidor para ver t nal se¬ 
na su funcionamiento según el esquema que acaba de describirse, sino que uti¬ 
lizaremos un ejemplo bastante sencillo para simular una situación similar I I 
punto central de dicho ejemplo será la clase siguiente: 


Public Class Copiador 





Prívate N As Integer 


Public Sub Cuenta() 
N í = 1 


If N Mod 5=0 Then Th read. S leep( 1 ) 

Thread.CurrentThread.Name * N 

End Sub 

End Class 

La clase no efectúa ningún proceso complejo para elaborar una respuesta de 
cara al cliente, limitándose a la asignación de un índice teóricamente único. De 
forma pseudo-aleatoria, en realidad siempre que el resto de dividir N entre 5 
sea cero, suspendemos la ejecución del hilo actual durante un milísegundo, de 
tal manera que, en la práctica, múltiples hilos ejecutando el método Cuenta ( ) 
emplearán distinto tiempo en realizar su trabajo. 

Observe que la variable N se ha declarado como privada a la clase, fn el me 
todo Cuenta ( ) se incrementa su valor y, a continuación, se asigna a la propie¬ 
dad Ñame del hilo actual, del hilo que esté ejecutando el método en esc momento 
I céricamente el proceso es correcto, poro veamos qué ocurre al simular que se 
reciben solicitudes de unas decenas de clientes: 

Sub Main( ) 

Dim MiCont.ador As New Contador() 

Dim Hilos() As Thread 

Dim Indice As Integer 


ReDim Hilos(49) 

For Indice = Hi 1 os . GeLLowerBound ( 0 ) To Hilos. Get.l/ppe rBound ( 0 ) 

Hilos(Indice) * New Thread{ AddressOf MiContador.Cuenta) 
Hilos(Indice).Start() 

Nex t 


For Indice = lli ios . Ge t Lowei Bound { 0 ) To H i los . Get Upper Bound { 0 ) 

Consolé.WriteLine("El Hilo(<0>) se llama {1)", 

Indice, Hilos(Indice).Ñame) 

Nex t 
End Sub 

Lude modificar la sentencia Red im para alterar el número de hilos que con¬ 
currentemente ejecutarán el método Cuenta ( ) y comprobar las diferencias al 
aumentar o disminuir ese número I n la figura 9.2 puede ver un ejemplo de 



dicho resultad o. Observe que la mayoría de los hilos no tienen un contenido en 
la propiedad Ñame. Además, algunos índices no son utilizados, mientras que 
otros aparecen en más de un hilo. Definitivamente nuestra implementaeion tie¬ 
ne más de un problema. 



Figura 9.2. Los hilos entran en conflicto y generan un resultado inesperado 


Esperas entre hilos 

l.o primero que nos llama la atención del resultado que hemos obtenido es 
el hecho de que la mayoría de los hilos no tienen un Índice, os decir, la poque¬ 
dad Ñame del objeto Thread que representa al hilo está vacía En el primer bu¬ 
cle que hay en el método Main( ) se ponen en marcha varias decenas de hilos 
de ejecución, tras lo cual el hilo principal sigue su curso y llega al segundo de 
los bucles. En él se recorren nuevamente lodos los hilos recuperando, v mostran¬ 
do por la consola, el indice correspondiente, El problema es que cuando se lle¬ 
ga al segundo bucle no todos los hilos de ejecución previamente iniciados han 
completado su ejecución, de ahí que en algunos la propiedad Ñame no tenga un 
valor Antes de recuperar dicha propiedad, el hilo principal debería asegurar¬ 
se de que el hilo que va a examinar haya I¡nalizado su trabajo 

La codificación actual del segundo bucle debería modificarse, de tal lorma 
que antes de acceder a la propiedad Ñame del hilo Indice estemos seguros do 
que ese hilo ha terminado v, por tanto, la mencionada propiedad tendrá un va¬ 
lor correcto. Esta modificación es realmente simple: basta con añadir la linea 
siguiente en el interior del bucle, justo antes de llamar a Writ.eLine( ). 

Hi los(Indice).Join() 

Al invocar al método Join ( ) de un cierto hilo, en este caso H i lo ( Indice), 
el hilo desde el que se efectúa la llamada, en nuestro caso el hilo principal de 





ejecución, quedara detenido hasta que el primero llegue a su fin. Ln oirás pa¬ 
labras, hacemos una pausa en la ejecución del bucle hasta que el hilo Indice 
ha terminado, momento en el cual podemos recuperare! contenido de la propie¬ 
dad Ñame con la seguridad de que ya se ha efectuado la asignación 

I ras este cambio, una nueva ejecución del programa generará el resultado 
que puede verse en la figura 9.3. Ahora todos los hilos tienen un índice pero, 
como se aprecia en esa figura, existen claros conflictos. Por una parte hay va¬ 
rios con el mismo índice, mientras que algunos números no han llegado a utili¬ 
zarse. Si utilizásemos ese índice para identificar al cliente tendríamos problemas 
ya que la asignación no ha sido correcta. 
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Figura 9.3. Aunque con mejoras, el resultado sigue siendo incorrecto 


Accesos exclusivos 


Fl problema que tiene nuestro programa es que múltiples hilos, de manera 
desordenada, modifican y recuperan el valor de la variable N, común a todos 
ellos. La causa es que el sistema puede interrumpir la ejecución de un hilo mien¬ 
tras esta procesando las tres sentencias siguientes, dando paso a un nuevo hilo 
que comenzaría por la primera o continuaría donde se hubiese quedado si es 
que había sido suspendido previamente. 

N +« 1 

If N Mod 5*0 Then Thread.S1eep(1 ) 

Thread.CurrentThread.Ñame = N 

Suponga que se pone en marcha el primer hilo de ejecución y, tras incremen¬ 
tar el valor de N, es suspendido para dar paso a la ejecución del segundo. Fste 
















vuelve a incrementar el valor N y lo toma como índice propio, tras lo cual se 
reactiva el primer hilo que, como puede suponer, encuentra en N el mismo va¬ 
lor que el segundo, lis el caso en que varios hilos toman el mismo índice. De ma¬ 
nera analoga, debido al incremento desordenado de múltiples hilos, es posible 
que queden índices sin utilizar. 

La solución a este problema es lógica: debemos evitar que mientras un hilo 
esta ejecutando las tres sentencias anteriores otro hilo pueda acceder a ellas. Di¬ 
cho de otra forma, el código de esas tres sentencias debería ser exclusivamente 
accesible para un solo hilo. Con este fin podemos utilizar diversos mecanis¬ 
mos. siendo uno de ellos la clase Monitor. 

Dos de los métodos de esta clase, Enter( ) y Exit{ ), disponen una señal 
en un objeto que debemos facilitar como parámetro. Dicho objeto debe ser ge¬ 
neral a toctos los hilos cuyo acceso quiere controlarse, pudiendo ser de cual¬ 
quier tipo. Poetemos utilizar, por ejemplo, la referencia al propio objeto al que 
pertenece el método Cuenta ( ) que, tras modificarlo, quedaría así: 

Public Sub Cuenta() 

Monitor.Enter(Me) 

N +« 1 


If N Mod 5=0 Then Thread. Sleep(1) 

Thread.CurrentThread.Ñame * N 
Monitor.Exit (Me) 

End Sub 

Observe que no creamos ningún objeto de la clase Monitor, de hecho no es 
posible, sino que usamos directamente los métodos compartidos Enter ( ) v 
Exit ( ) para delimitar la porción de código que no debe ser accedida por más 
de un hilo simultáneamente. Tras este nuevo cambio, la ejecución del progra¬ 
ma producirá un resultado similar al de la figura 9.4. A pesar de que la asigna¬ 
ción de índices no es consecutiva, ya que los distintos hilos no tienen por qué 
ejecutarse de manera secuencial, hemos conseguido nuestro objetivo: cada ob- 
jeto Thread tiene un índice único y, además, no hay índices sin usar. La identi¬ 
ficación, en el hipotético componente de servidor, estaría conseguida. 


Nota 

En este ejemplo se ha sincronizado el acceso exclusivo de los hilos de eje¬ 
cución a todo el código del métodocuen ta ( ). de tal manera que se pierde, 
en parte, la ventaja de la ejecución simultánea que facilita el trabajo con 
varios hilos. En la práctica, sin embargo, las sentencias alojadas entre las 
llamadas a Enter ( ) y Exit ( ), serían sólo las que modificasen y recupe¬ 
rasen el valor de N, mientras que el resto del procedimiento, que realizaría 
la tarea de cara al cliente, podría seguir ejecutándose de manera concu¬ 
rrente. 
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I*MBB «ny kay tn continué. 



Figura 9.4. Obtenemos el resultado correcto al sincronizar adecuadamente 
los hilos 


Otros métodos de sincronización 

I a d«i>o Moni tor es tan sólo uno de los reí tirsos existentes en Visual Basic 
NH para sincronizar el acceso a datos comunes. I I propio lenguaje, asi como 
el ámbito System. Thread inq. disponen de alternativas que permiten contro¬ 
lar tanto dicha situación como similares que pudieran surgir 

Uno de los recursos del lenguaje, del nuevo Visual Basic NI'.T, es la senten¬ 
cia SyncLock. I sta va emparejada con una End SyncLock. de manera similar 
a lo que ocurre con I f, Select v otras sentencias que delimitan bloques do 
sentencias. Al igual que ocurre con la clase Monitor, la sentencia SyncLock 
necesita un objeto compartido entre los distintos hilos para poder señalizar la 
sincronización l’odas las sentencias introducidas en el bloque serán ejecutadas 
sólo por un hilo de manera concurrente. 

Usando SyncLock, por tanto, podríamos modificar el fragmento de código 
del punto anterior dejándolo como sigue: 

Public Sub Cuent_a() 

SyncLock Me 

N 1*1 - ! f 


if N Mod 5=0 Then Thread.Sleepfl) 





Thread .Cutí en!.Thread . Ñame * N 

End SyncLock 

I I resultado obtenido, al ejecutar esto codigo. os exactamente el mismo que 
va teníamos I s lógico dado que la sentencia SyncLock lo que h«ue. al Im \ al 
cabo, es utilizar un monitor para gestionar la sincronización de las sentencias 
indicadas. 

Otro recurso a nuestra disposición es la clase Mutex, cuyo luncionamiento 
se asemeja a la clase Monitor va usada en el punto pre\ ¡o. I n lugai de los me 
lodos Enter ( ) \ Exit( ) se usan Wa itOne( ) \ ReleaseMutex ( ) I ,1 dite- 
rencia es que un Mutex permite registrar varias esperas sin necesidad de ueai 
múltiples objetos 


Interbloqueos y señales 

lii una de las versiones del ejemplo que esta utilizándose .1 lo largo del ca¬ 
pitulo heñios usado el método Join ( ) de la dase Thread para esperar la íina- 
li/ación de un cierto hilo de ejecución, de tal forma que pudiera recuperarse el 
Resultado por el producido de una manera segura hs ésta una técnica habitual 
lanzar dos hilos de ejecución paralelos y que, en un momento determinado 
uno espere a que el otro termine para poder utilizar los resultados que lia ge 
ñera do. 

AI usar el método Jo±n< ) entremos un riesgo si nuestra implementauon 
no esta bien diseñada; que un hilo espere la finalización de otro \ que ese otro. 

1 011 otra ILimada a Join ( ), esté, a su \ ez. esperando la linaliz.n ion del pr uñe¬ 
ro I n lo que se conoce 1 orno un ñ/hvWoiptiV o tU'ihl-hu k. I I resultado es que los 
dos hilos permanecen detenidos indefinidamente causando, en la práctica, el 
bloqueo de la aplicación. 

I a implenientacion del método Join ( ) usada en el ejemplo anlerim espera 
hasta que el hilo termina su ejecución, pero existen otras versiones del mismo 
método que permiten indicar un tiempo máximo di* espera, en mihsegundos, 
transcurrido el cual la ejecución continuara a pesar de que el hilo supervisado 
aún no haya llegado <1 su tin. 

I n lugar de usar el método Join ( ), que podríamos considerar como el ele¬ 
mento de alto nivel para sincronizaciones entre hilos, podemos reciu m al uso 
de clases como Manua 1 ResetEvent v AutoResetEvent Ambas gestionan la 
señalización necesario para permitir que unos hilos esperen a que otros les per 
mitán o no continuar. I n la documentación del ámbito System.Threading 
encontrará la reterencia completa de éstas \ otras clases. 


Nota 

Una problemática especial se plantea al invocar a métodos de elementos 
de interfaz de usuario, tal como pueden ser los controles de un formulario 



Windows, desde un hilo de ejecución diferente al que se utilizo para su 
creación La sincronización, en este caso, pasa por el uso del métodocon- 
trol. invoke ( ) para llamar indirectamente al método que nos interese, 
en lugar de invocarlo directamente como es lo habitual 


Puntos clave 


• I I uso do múltiplos hilos do ojeen cion en un pros ec lo tiene .iplu ai iones 
mu\ concretas: atender simultáneamente a múltiples dientes, mantener 
viva una infería/ do usuario o dejar en segundo plano procesos lentos. Su 
uso indiscriminado aleclara negativamente .1 1 rendimiento general del 
programa. 

• Para gestionar un hilo de ejecución se usan los métodos \ propiedades de 
lii clase Thread 

• Al crear un objeto Thread es necesario facilitar la dirección de un nieto- 
do l.sie contendrá el código a ejecutar por el hilo 

• I a creación de un hilo no implica su ojei lición inmediata Disponemos de 
varios métodos que nos permiten control.ir el hilo: star t ( ), Suspend ( ), 
Resume( ), etc. 

• C ada hilo tiene asociada una prioridad de ejecución que determina el 
tiempo de procesador que puede usar. Podemos conocer, \ modificar, di¬ 
cha prioridad con la propiedad Priority de la clase Thread 

• 1.1 acceso simultáneo por varios hilos de ejecución «1 dalos compartidos 
puede generar problemas de sincronización, para evitarlos existen clases 
como Monitor \ Mutex. asi como nuevas sentencias como SyncLock. 

• Un hilo puede esperar la finalización do otro de diversas maneras Una 
de ellas es el método Jo i n ( ) de la clase Thread. otro el uso de las clases 
AutoResetEventv ManualResetEvenL. 


Resumen 


I I conocimiento que ha adquirido a lo largo de este capitulo le servirá como 
punto de partida a la hora de desarrollar aplicaciones \ componentes que usen 
múltiples hilos de ejecución, aunque en la practica puede encontrarse con más 
problemas v prec isar elementos adicionales de control o sinc roni/ac ion I 11 do¬ 
lí nitiva. ahora mismo va sabe cómo poner en marcha varios hilos ele ojeeuciún. 
cómo ponerlos en marcha v determinar su estado. También lia aprendido las 
bases tic la sincronización entre hilos a la hora di* ai ceder ti información cum¬ 
pa rlicia. 



Tratadas en este y los capítulos precedentes temáticas generales, como las 
estructuras de control, las nuevas construcciones orientadas a objetos o el mis¬ 
mo uso de la concurrencia, que pueden aplicarse a cualquier tipo de aplicación 
o componente, a partir del próximo capitulo comenzaremos a ocuparnos de te¬ 
rnas más específicos como la construcción de aplicaciones Windows v Web ba¬ 
sadas en formularios, la elaboración de gráficos o su impresión. Fin todos estos 
contextos necesitaremos contar con la base aportada en estos primeros capítu¬ 
los, base que nos ha permitido conocer el lenguaje Visual Basic NF I \ algunos 
servicios eoiu reíos de la plataforma .NET. 
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Formularios 

Windows 


A pcs.ir di* que el apelativo Ni.l hace que .ismuiim» rápidamente Visual 
Basic NI I con oí desarrólletele aplicaciones v servicios para Intornot e ú//n?//Ws 
corporatix. as, lo <. ierlo os que .mu hoy. comenzando ol año 2002. una gran parlo 
do los provocios que s<* desarrollan lionon como destinatario ol sistema operati¬ 
vo Windows en alguna do sus diferentes versiones: us, MHIonnim, N I 2000 o 
bien XIV 

No os do o\l rañar \ «1 que Windows os ol sistema o peral i \ o dommanlc en los 
sistemas do escritorio, los que utiliza ol usuario final, v on una parle importan- 
lo do servidores de aplicaciones \ datos* 

C orno no podía sor do otra manera, Visual Basic NI I incorpora todos los 
elementos necesarios para desarrollar aplicaciones para Windows I n reali¬ 
dad, con Visual Basic .NI- I no podemos 1 rear aplicaciones nativas para dicho 
sistema, sino aplicaciones que se ejecutan en Windov\scon la platalorma .Nl.l 
instalad a. 

Hasta ahora ih» hav ninguna versión de Windows que incorpore dicha pla¬ 
taforma, la primera sera Windows .NFT. pero posiblemente aparezca como un 
Vre/i r Ptick o actualizarion para Windows \l\ 2000 v otras versiones mas an¬ 
tiguas. 

leniendo instalada la plataforma NI I. nuestras aplicaciones Windows, 
desarrolladas con Visual Ba.sit Nl.l. podran hacer uso de los lormularios Win¬ 
dows, CDI+v otros servicios para Windows existentes en .NI* I lín este capitu¬ 
lo nos centraremos en el uso do formularios Window s para ere.ir interfaces do 
usuario Windows. 






¿Qué son los formularios Windows? 


Como va sobr, se indicó en el tercer capítulo, !.i plataforma NI I incorpora 
un.) serie de servicios accesibles para las aplicaciones que podemos desarrollar 
con Visual Basic NIT. I n la figura .1.8 se representaban algunos de esos serví 
cios, parle de los c uales agrupábamos bajo la denominación Win I onn<. 

I a plataforma . NTT incorpora un ámbito, System. Windows . Forms concre¬ 
tamente, en el que existen múltiples clases cuya finalidad es lacililar el desano 
lio de aplicaciones Windows. I sas clases pueden usarse desde cualquier lenguaje 
NI I. Visual Sludio NI T, ademas, incorpora asislenles y diseñadores capaces 
lie generar v administrar el código de este tipo de aplicaciones en dos lenguajes: 
Visual Basic NI I , que es el que nos interesa de t orín a particular, \ Visual C - 
Lina de las clases existentes en dicho ámbito es Form, clase que representa 
al tipien formulario que estábamos acostumbrados a usar en versiones pu*\ ias 
de Visual Basic. I a diferencia es que en dichas versiones el formulario era casi 
algo mágico, un demonio que aparecía en el proyecto v sobre el que podíamos 
insertar componentes, luí Visual Basic .NI* I por el contrario, lodo formulario 
diseñado por nosotros define aulomálicamonlo, como podremos ver, una clase 
derivada Form, cla.se sobre la cual leñemos un control absoluto. 

i n Visual Basic. NI I por lanío, un formulario Windows es un objeto de la 
clase Sys ten . W i ndows . Forrns . Form o de una clase derivada de ésta. L orno 
veremos de inmediato, los asistentes \ diseñadores \ ¡sítales se encargan de ge¬ 
nerar la dase derivada e ir personalizándola a medida que se insertan compo¬ 
nentes, modifican propiedades v gestionan eventos. Nuestro trabajo, como en 
versiones previas de Visual Basic, se limitara a operar iones de arrastrar v sol 
tar, edición de propiedades en una ventana \ escritura del código importante 
la lógica de negocio, asociad.» a los eventos. 

Una aplicación Windows sencilla 

Para estudiar los elementos que forman parte de una aplicación Windows 
comenzaremos creando una bastante sencilla, utilizando el diseñador de formu¬ 
larios v elementos como la ventana Propiedades \ el Cuadro de herramientas, 
para después analizar el código resultante. 

Iniciamos un nuevo provecto Aplicación para Windows con Visual Basic 
.NET. corno se aprecia en la figura 10.1 Obtenemos un provecto formado por 
ilos módulos Assembl yin f o. vb \ Forml.vb II primero de ellos aloja iníor 
m.u ion sobre el ensamblado que generará el provecto, mientras que el según 
do contiene el código que creará y gestionará el formulario 

l o que se ve en la parte central del entorno es una ventana v acia, un formu¬ 
lario. I'ste es representación del código contenido actualmente en el modulo 
Forml. vb. De hecho, para alterar las características v comportamiento de este 
formulario tenemos dos posibilidades edilai directamente ese código o utili 
zar el diseñador de formularios. 




Figura 10.1. Seleccionamos el tipo de proyecto 


Diseño de\ formulario 

Utilizando algunos componentes del Cuadro de herramientas v la ventana 
Propiedades dejaremos el formulario tal v como puede verse en la figura 10.2. 
Hemos insertado los siguientes componentes: un Label, un TextBox, un 
Button v un ListBox. Kdilando la propiedad Text de los tres primeros mo¬ 
dificaremos los títulos v contenidos. También alteramos la propiedad Ñame del 
TextBox y el ListBox para darles un nombre nías lógico que los establecidos 
por defecto. 

I a caja de texto, nombre con el que se conoce de forma habitual al control 
TextBox. nos servirá para introducir datos que irán añadiéndose a la lisia, 
dispuesta debajo, cada vez que se pulse el botón titulado Añadir. 

Lógicamente podríamos modificar muchas otras propiedades, tanto del for¬ 
mulario como de los controles. Tan sólo tendríamos que conocer o! significado 
de cada una de ellas v los valores que pueden tomar. Lista es una información 
ile referencia que puede encontrar en la propia ayuda de Visual Basii NI I v 
no tiene sentido enumerarla aquí propiedad por propiedad, método por méto¬ 
do y evento por evento. 

Implementación de funcionalidad 

Si ejecutamos ahora mismo nuestro provecto veremos «iparecer la ventana 
del programa, podremos pulsar el botón que hav en ella e, incluso, introducir 
un dato en la caja de texto. No veremos, sin embargo, ninguna reacción por par¬ 
te del programa, aparte de cerrar la ventana al pulsar el botón correspondiente. 

Para que al pulsar el botón Añadir el dato introducido en la caja de texto se 
anada a la lista, tal y como deseamos, tendremos que escribir algo de código. 
Lste código deberá ejecutarse cuando se produzca el evento Click del men¬ 
cionado botón, l eñemos dos opciones abrir la lisia de eventos del componente 

















Análisis del código generado 


I I programa si* comporta ahora como deseábamos. Un la figura 10.3 puede 
ver su apariencia tras añadir algunos dalos en la lista. Nosotros tan solo hemos 


que aparece en la parte superior del editor de código y seleccionar el evento 
Click, sería el procedimiento habitual para la mayoría de los eventos, o hacer 
doble clic directamente sobre el botón, va que el evento por detecto es Click 
I I diseñador genera un nuevo método y nosotros tan sólo tenemos que in¬ 
troducir en el las tres sentencias siguientes: 


lbDatos.Items.Add (tbDato.Text) 
tbDato.Se 1ectA1l( ) 
tbDato.Focus() 


l a propiedad Items del ListBox nos permite acceder a la lista de elemen¬ 
tos que contiene este control. Con el método Add ( ), como puede suponer, aña¬ 
dimos un elemento a esa lista, concretamente el texto introducido en el TextBox. 
I'ste, el control llamado tbDato, mantendrá el texto introducido, texto que se¬ 
leccionamos mediante el método SelectAll( ) para asi facilitar la introduc¬ 
ción de otro dato. Finalmente, utilizamos el método Focus ( ) para devolver el 
foco de entrada a la caja de texto va que, tras pulsar el botón, el loco de entrada 
estaría en otro punto. 


LlstaDatos - Microsoft Visual Baslc.NET [diseñar] - Forml.vb (Diseño] 

¿kWv© E4*o3« tm Provecto Qfnmr ¡Murar o«as Fjmrwm v*ot*M Avyda MU oportUrt 

* 1 * * • ’M 

' • • « « i A . 

4 Ojw»o <fe bmmwtm a X íorml vli |0 *mAo) | Expionúo -te 


I» 

A m-* 

A LrtUN 

4 Bucon 

15 T «rtBo» 

A Mjrttamj 
P CTwftto» 


.J Retinto* 

□ 

OrtaCnj 

rl Cambeto* 
II* UTWWi 
^ TrMV^M 
_j rrttcanms 
13 CMüTmlV 
*7 MantrdÉVK 


^ ApHcacfón simple 


liftonóof 4* kAjccom LfiQOato* J X 

. • ■ ■ 

3 I Ht JDrtiK 

AmmWrtnfc.wt» 

9 formi .rtt 

*3 ••■ ■■ ~ 3Em taatt» ob« nufl-f 


¡(fonnJ 3 

: i* re 

PJK^rourítlIirjp* £2] (liround! »J 
I . Cuno' P*t* j» 

UJ * ■ 

¡ Fo(*Catoi H 

fomtofOmSrffr Vrablr 
I ftgMTatrtt NC 

T*ir | Ai'br m «iii 

Q •«•**« 

: ; ikMDmp 

(nrojno) 

-Ll 

Ttrto contando** «control 


Figura 10.2. Aspecto del formulario tras introducir los controles y modificar 
propiedades 





escrito el código necesario para añadir cada dalo introducido a la lista, el resto 
del código ha sido generado automáticamente. 

I s necesario analizarlo para comprender qué es lo que esta ocurriendo, por 
que aparece la ventana, los controles se colocan en la posición que habíamos 
establecido en el diseñador, etc 
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Figura 10.3. Aspecto del programa en luncionamiento 

Vamos a ir recorriendo el módulo de codigo de principio a lili, seccionándolo 
y comentándolo para saber que es lo que hace I uncí uñar nuestra aplicación I o 
primero que encontramos es la definición de una nuev a dase, llamada Forntl. 
que es derivada de la clase Form. lista se encuentra definida en el ámbito Sys¬ 
tem .Windows.Forms: 

Public class Form1 

Inherits Sysiem.Windows.Forros.Form 

Puede utilizar el Examinador de objetos para ver cual es el contenido de es 
te ámbito v los enumerados en la lista Importaciones de! proyecto (véase la figu¬ 
ra 1(1-4) Esta lista puede usarse para importar ámbitos con nombre sin necesidad 
de utilizar la sentencia Imports I I que mas nos interesa en este momento es 
System. Windows . Forms, en el que se alojan las clases correspondientes al 
formulario v los controles. 


Nota 

Aunque la clase Form se encuentra en System. Windows . Forms, tal y co¬ 
mo se ha indicado, la clase Forml . definida automáticamente por el dise¬ 
ñador, se alojará en el ámbito de nuestro proyecto que, como recordará, se 
establece en la ventana de propiedades en la página General. 


Al oslar derivada de System. Windows . Forms . Form, la clase Forml va 
cuenta con una serie de propiedades y características que le hacen comportar¬ 
se como una ventana típica de Windows. I sla es, precisamente, una de las ven¬ 
tajas de la herencia. 







Figura 10.4. Ámbitos con nombre importados por el proyecto 

Continuando ron nuestro recorrido por el modulo de código, lo siguiente que 
encontramos es una etiqueta con el titulo Windows Form Designer generated 
code tal como se aprecia en la parle superior de l.i I i gura 10.5 Puede situar el 
puntero del ratón sobre dicha etiqueta para ver. en una ventana emergente, 
parte del código que contiene esa región. Para acceder completamente al códi¬ 
go, inspeccionándolo, tan solo tenemos que pulsar sobre el signo +■ que aparece 
en el margen izquierdo a la altura de la citada etiqueta 
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Figura 10.5. Parte del código está oculto en una región 


Lo primero que encontramos en esta región es el constructor de la clase, en¬ 
cargado de configurar el formulario antes de que este se haga visible en panta¬ 
lla. Como puede verse a continuación, en principio el constructor sólo contiene 
una llamada al constructor base y otra al método In ¡ t ia 1 izeComponent ( ), 
sobre el que volveremos después, y una serie de comentarios, bs el punto ade¬ 
cuado para que añadamos manualmente cualquier código de preparación que 
necesitemos. 








Public Sub New t ) 
MyBase.New ( ) 


initializeComponeni { ) 


End Sub 

I I código del destructor, dispuesto a continuación del constructor, so encar¬ 
go de comprobar si la variable componentes contieno alguna relereneia. casi» 
on el cual so procedo a la correspondiente liberación de recursos. Después se 
llama al método Dispose{ ) de la clase base, completando asi el proceso do 
destrucción. 


Protected Overloads Overrides Sub Desposeí 
ByVal disposing As Boolean) 

If disposing Then 

If Not (components Is Nothíng) Then 
components.Dispose() 

End If 
End If 

MyBase.Dispose(disposing) 

End Sub 

I ras el constructor \ el destructor encontramos la definición de cuatro miem¬ 
bros do dalos, concreta mente cuatro objetos do otras tantas clases. 

Friend WithEvents l.abel I As 

System.windows.Forras.Label 
Friend WithEvents tbDato As 

System.Windows.Forras.TextBox 
Friend WithEvents Bnt.tonl As 

Syst.em . Windows . Forras . Bul. ton 
Friend WithEvents lbDatos As 

System.Windows.Forras.ListBox 

Cada una do estas variables representa a uno de los controles que hemos in- 
soi I.hío pre\ ¡amento en el formulario. I la sido el diseñador el que, cuando he¬ 
mos insertado cada control, se lia ocupado de escribir este código, aparte del 
necesario para crear cada objeto e insertarlo en el contenedor que es el formu¬ 
lario, como veremos en un momento. 


Nota 

Ya que previamente se ha importado el ámbito System. Windows . Forms, 
para hacer referencia a las clases Label, TextBox, ListBox y Button 
no seria preciso utilizar una referencia completa y nos bastaría con usar el 



nombre de la clase. El diseñador, sin embargo, genera estas referencias 
completas para evitar posibles conflictos con otras clases que, habiendo si¬ 
do definidas en otros ámbitos, coincidan en nombre. 


Observe el liso de los modificadores Friend v WithEvents. El primero 
establece el ámbito de visibilidad de los idenlifieadores de tal manera que pue¬ 
dan ser accesibles por clases derivadas \ desde cualquier punto del modulo 
actual. I I segundo prepara el objeto para que sus eventos puedan ser intercep¬ 
tados por métodos de nuestra clase, según se vio en un capítulo anterior. 

Aparte de esas cuatro variables, justo después encontramos otra más: 

Prívate componente As __ 

System.ComponentModel.Container 

La variable components, en principio con un valor nulo, contendrá una re¬ 
ferencia a un objeto de la clase Container. Esta clase se utiliza, en este caso 
concreto, para contener los controles que aparecerán en el formulario v es usa¬ 
da internamente por el diseñador de formularios, por lo que no debemos mam 
pillarla si pretendemos seguir trabajando de manera visual sobre la ventana. 

I o siguiente que encontramos es el método InitializeComponent ( ) al 
que se llama desde el constructor del formulario. Sil tinalidad es traducir lu¬ 
das las acciones que hemos realizado en el diseñador, insertando componentes 
y personalizando sus propiedades, en sentencias que, al ser ejecutadas, repro¬ 
ducirán el aspecto de la ventana tal v como la hemos diseñado. El código de es¬ 
te método es el siguiente: 

Private Sub InitializeComponent() 

Me.Labeil = New Systen.Windows.Forma.Labe1() 

Me.tbDato * New System.Windows.Forms.TextBox() 

Me.ButtonI ■ New System.Windows.Forms.Button() 

Me.lbDatos * New System. Windows . Forms . I.ist Box ( ) 

Me.SuspendLayout( ) 


Me . I.abe 1 1 . Au toSi ze - True 
Me.Label1.Location * New _ 

System . Drawi ng . PoinL ( 1 6 , 24) 

Me . Labe l 1 . Ñame * '"Labe 11“ 

Me.Labe 11.Size » New System.Drawing.Size(72, 13) 

Me.Label1.TabJndex = 0 

Me . Labe 1 l . Texi. = "Dato a añadir" 


Me . tbDato . Locat.ion * New 

System.Drawing.Point(16, 40) 

Me . i.bDaLo.Name » "tbDato" 

Me.tbDato.Size - New System.Drawing.Size(t44, 20) 
Me.tbDato.Tablndex = 1 
Me. tbDato .Text = -" 




Me. B it ton 1 . Loca*, ion New 

Sy st f»m. Dt «íwitig . Po i n * ( I 8 4 , 40) 
Me. Buttoii i - Ñame? ~ "bul i únl " 

Me. Buttonl.Tablndex ¿ 

Me. B'.i i ton 1 . T^xt. "Añadir" 


Me.1bDaLos.Localion New 

System, ür aw ing . Po i ni { 1 ♦>, 80 ) 
Me. lbDdtos.Nanie - "lbDatos" 

Me. IbfJai os «S i ze New 

System.Drawing.Size( 2 48 , 1b0 ) 
Me.1bDatos.TabIndex 3 


Me.AuIoSra1eBaseSize - New 

System. Drawing-fJize ( 5 # 13) 

Me. Client Si ü«? _ New 

Sy s i.em.Drawmq . Size ( 292, 2 bb ) 

Me.Controls.AddPanqe(New 

System.Windows.Forma.Control i > _ 

(Me. I boatos, Me.BiiLtonI , 

Me.tbDato, Me.Labell>) 

Me.ñame - "Forml" 

Me.Text * "Aplicación simple" 

Me . Resumt.-Luyout (Falso) 

End Sub 

I as primeras cuatro sentencias que encontramos son las enearcadas de croar 
los objetos de las clases Labei. TextBox, Button \ ListBox, guardando las 
respectivas rvlereni ¡as on las variables que, a tal electo, se habían declarado al 
principio di* la clase. 

A continuai ion cncontramos cualro bloques de vanas sentencias, cada uno 
ile ellos encardado de couligut ai* cada uno de los controles Si* establece su nom¬ 
bre, titulo, orden de acceso mediante el fabulador, posición v dimensiones. 
Observe que las propiedades Location v Size toman como valor objetos de 
las i lasos Point v Size. definidas en el ámbito Sys lem. Drawing 

I inalmente, en lo relativo al método InitializeComponent ( ), encontra¬ 
mos el bloque de sentencias que configuran el loi miliario. I as primeras es¬ 
tablecen ^us dimensiones. A continuación tenemos otra que llama al método 
AddRange( ) de la propiedad Controls para añadir los cuatro controles ante¬ 
riormente creados. I a propiedad Controls da acceso a la lista de componen 
tes contenidos en otro, en este caso los controles contenidos en el formulario 
I I método AddRangef ) añade* a esa lista los componentes que se facilitan co 
mu parámetro en forma de arreglo I n este caso concreto, el arreglo se cletine 
en la propia llamada al método 

l'or ultimo tenemos un método al que corresponde la siguiente < abecera 



Private Sub Button l_Click( 

ByVa 1 sender As System. Object , 

ByVal e As Sysiem.EventArgs) _ 

Ha ndles BuLton 1.C1ick 

Observe como se utiliza Ia palabra clavo Handles para asociar la ejecución 
de es le método con el evento Click de Buttonl. In un capítulo previo vimos 
otra íorma de hacer lo mismo con AddHandler 

I I punto de entrada a este programa no es el típico método Main ( ), como 
en los ejemplos de capítulos previos, sino el propio formulario. Abra la venta¬ 
na de propiedades del proyecto y compruebe el valor de la lista Objeto inicial. 
Vera, como en la lisura 10.6, que se apunta al objeto Forml. 



Figura 10.6. Objeto que será creado para poner en marcha la aplicación 


Resumiendo 

liste programa simple pone en marcha una aplicación Windows, algo que 
podríamos hacer también llamando al método Run ( ) de la clase Appl i catión 
desde nuestro método Main( ) 

Opcionalmente podemos facilitar un objeto de una clase derivada de Form, 
un formulario, que se haría visible tras iniciarse la aplicación Lógicamente, en 
el modulo podríamos lener lanías definiciones de humíllanos como precise¬ 
mos, aunque lo habitual es que cada formulario, y sus miembros, se alojen en 
un modulo independiente. 

Añada al final de la definición de la clase Forml el código siguiente 

Shared Sub Main() 

App i i caí. i on . Run ( New Form 1 ( ) ) 

End Sub 






A continuación abra la ventana di* propiedades del pravnli» e indique que 
i*l punto de entrada es el método Main( J v ejecuto el provecto I I resultado, 
como podro ver. es idéntico, peio en este caso Mimos nosotros los que pone 
mos en man. ha la aplicación v c reamos el formulario 

Obv ¡amento. podríamos generar esta mismo apluac ion escribiendo noso¬ 
tros mismos el codito I amblen es obvie» que resulta mucho mas taeil ion.se- 
guii el mismo resollado utili/ando el diseñador de im muíanos, el Cuadro de 
herramientas v la ventana Propiedades, dejando que sean ellos los que generen 
\ manipulen el codito. No es habitual, al menos trabajando eon Visual Basic 
NI I, que eodiliquemos tareas i orno la creac ion cié los controles v el establee t- 
miento di* su posición v dimensiones. 

I.o mino que necesitamos, por tanto, es conocer los elementos que tenemos 
disponible* en el Cuadro de herramientas, saber como instalar cualquier otro 
control que pudiéramos necesitar \. lógicamente, contar con inlorm.uion de 
Lis propiedades, métodos \ eventos de cada uno de esos componentes. 

Información sobro la aplicación 

1 orno acabamos de ver, una aplii ación Window s se pone en marcha automá¬ 
ticamente ovando un objeto de una clase derivada de Form I n realidad, tras 
el código que nosotros podemos \ er se ulili/an los métodos de la c lase Appl i- 
cation. No es preciso crear un ob|elo de esta clase va que la macona de sos 
miembros son estáticos, lo cual significa que pueden ser usados de manera di¬ 
recta, sin estar asoc iados a un objeto. I sla dase dispone cíe propiedades con 
chito* informativos diversos, asi tomo métodos que controlan el llujo de la 
aplicación. I amblen genera algunos eventos interesantes. 

Inicio de \a aplicación 

C liando ejecutamos una apltcai ion el control suele tomarlo un método com¬ 
partido de*I inido en alguna de las clases, típicamente el método Ma i n ( ). C lian¬ 
do desde ese método se llama al método Run( ) de la clase App L ¿catión lo 
que se hac e es poner en manos de diiha c lase el control de la aplicación, de|an 
do que sea ella la que procese los mensajes v se em .irgue de gestionarlos. I *le 
proceso es electuacio aulomáliiamente por Visual Basic NI I cuando no se co¬ 
difica explícitamente el método Main( ) \, en mi lugai, se indica como punto 
de entrada a la aplicación la clase del Inrmulatin. 

Podemos llamar al método Ron ( ) de Appl ical ion sin tac ¡litar parame! 10 
alguno, caso en el cual se pone en marcha el buc le de proceso de mensajes sin 
moslr.it ninguna ventana I a segunda alternativa es la que hemos usado en el 
ejemplo anterior entregando como parámetro una referencia al lormulario 
que desea mostrarse como ventana inicial o principal 

Otra posibilidad, a la hora de invocar al método Run( ) consiste en crear 
un objeto de la clase App 1 ¡ cationContext v asignai a la propiedad Main Form 
una referencia al formulario a mostrar inii talmente 



Fn cualquier caso, el objeto Application se encargará, como se ha dicho, 
de procesar los mensajes que reciba del sistema o bien remitirlos al destinata¬ 
rio que corresponda, por ejemplo el botón o la caja de texto, para que los pro¬ 
cese adecuadamente. 

Datos del entorno de la aplicación 

Al iniciarse la aplicación, llamando al método Run( ), automáticamente se 
recuperan una serio de parámetros que son alojados en el interior de los miem¬ 
bros de la clase Appl i catión. Podemos recuperar esos dalos mediante nuil 
tiples propiedades. Fn la tabla 10.1 se resumen algunas de ellas indicando la 
información que contienen. 


Tabla 10.1. Propiedades informativas de la clase Application 


Propiedad 

Contenido 

StartupPath 

Camino desde el que se ha iniciado la aplicación 

Executab1ePa th 

Camino y nombre del ejecutable en el que se aloja la apli¬ 
cación 

CompanyÑame 

Nombre de la empresa que ha desarrollado la aplicación 

ProductName 

Nombre de la aplicación 

ProductVersion 

Versión de la aplicación 

UserAppDataPath 

Camino a la carpeta donde alojar información de usuario 

CommonAppDataPath 

Camino a la carpeta donde alojar información general a 
todos los usuarios 


Podemos preparar una aplicación sencilla que muestre estos datos en una 
lista a efectos de comprobación. Insertamos en un formulario un control List- 
Box, hacemos doble clic sobre el fondo del formulario para abrir el método co¬ 
rrespondiente al evento Load e introducimos el código siguiente: 


Dim Da I.og ( ) - { 

"StartupPath* " \ Application.StartupPath, 
"ExecutabLePath* " + 

Appl leal, ion .ExecutablePat.h, _ 

*CompanyÑame- “ f Appiication.CompanyNdme, 
"ProductÑame* " + AppJ.ication.ProductName, 
M ProductVersion 1 M + _ 

ApplicaLion.ProductVersion, _ 

"UserAppDataPath- " ♦ 

Application.UserAppDataPath, 

" CommonAppDa t a Pa t li" " +■ 

Application.CommonAppDataPath( ) 


Dim Indice As Byte 




For Indice 0 To Da t os . <íet. Upper Bound ( 0 ) - 1 

ibParametros.Items.Add { Datos(Indice » j 

Next 

Preparamos, on un arreglo do cadenas, los datos que deseamos mostrar A 
continuación la recorremos en un huele añadiendo cada una de ellas a la lisia. 
I I resollado es el que puede verse en la figura 10.7 
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Figura 10.7. El programa mostrando diversos datos del entorno 


Nota 

El dato alojado en Productversion se actualiza automáticamente cada 
vez que se compila el proyecto, consiguiendo así la diferenciación de dife¬ 
rentes versiones de la aplicación aún cuando sus índices de mayor peso no 
cambien. 


Otros miembros de interés 


Aparte de propiedades, en su mayor parte inlormativas. la clase Applica¬ 
tion también dispone de alalinos métodos v eventos que pueden resultar inte 
resanies. 

Para poner tin al bucle de proceso de mensajes en la practica i mali/ar la eje 
cucion del programa v cerrar sus v entanas, podernos llamaral método Exit( ). 
I I control se devolv erá a la sentencia siguiente a la que llamo a Run( ), gene 
raímente en el método Main( ). 

Mediante el método DoEvents{ ) habilitaremos el proceso de los mensajes 
que haya pendientes. Esto, normalmente, no es preciso hacerlo de manera ex¬ 
plícita *i menos que estemos ejecutando algún trabajo lento, que requiera mu¬ 
cho tiempo, l a alternativa, como ya sabemos, es ejecutar ese trabajo lento en 
un hilo concurrente. 

Los cuatro eventos de que dispone la clase Application son Applíca- 
tionExit. Idie, ThreadExcept ion v ThreadExit. El primero de ellos se* 











genera justo antes de que la aplicación termine, el segundo cuando la aplica¬ 
ción ha terminado un trabajo v va a quedar en espera, el tercero cuando se pro¬ 
duce 1 alguna excepción v, finalmente, el ultimo cada ve/ que linali/a un hilo de 
ejecución o tlmuul, incluido el principal. 

Aplicaciones de documento múltiple 

t orno hemos visto, en el ejemplo anterior, cuando una aplicación Windows 
so pone en marcha automáticamente aparece la ventana inicial, establecida por 
nosotros mismos al llamar al método Run ( ) o bien en la ventana de propieda¬ 
des del proyecto. 

I óticamente, la aplicación puede necesitar múltiples ventanas más. I stas 
deberán ser abiertas desde la ventana inicial a demanda del usuario. I*.s lo que 
ocurre habitualmente, por ejemplo, con los cuadros de diálogo. 

h l formulario o ventana principal de la aplicación puede actuar como conte¬ 
nedor de otras ventanas, dando lugara la típica aplicación MD1 o de documen¬ 
to múltiple. También tenemos a nuestra disposición algunos cmulros de diálogo 
prefabricados. 

Vamos a conocer algunos conceptos relativos al trabajo con ventanas basán¬ 
donos en un ejemplo cuyo resultado final sera el mostrado en la figura l(l.K: 
una aplicación MDI, similar a un editor multiarchivo, en el que podremos ele¬ 
gir el color del texto de cada ventana. 



Figura 10.8. Aspecto de la aplicación con dos ventanas MDI y un cuadro 
de dialogo abiertos 























Preparación de la ventana principal 

Afumamos que acabamos de iniciar un nuevo proyecto, tal y como hemos 
hecho en los dos ejemplos previos, por lo que disponemos, en este momento, 
de un formulario vacío que se comporta como una ventana estándar Para con¬ 
vertir esa ventana en un contenedor MDI, capaz de alojar otros formularios, lo 
único que hemos de hacer es dar el valor True a la propiedad IsMDICon tainer 
Al hacerlo verá que el tundo de la ventana cambia de color. 

Si examina el código del formulario, tras modificar esa propiedad, observa¬ 
ra que lo que hemos hedió es, realmente, algo mas complejo. No solo se asigna 
el valor True a la propiedad IsMDIContainer del formulario sino que, ade¬ 
mas, se crea un objeto de la clase MdiClient. Este control es el fondo mas os¬ 
curo que vemos en el interior del formulario y que ocupa todo el área disponible. 
C omo cualquier otro control, os añadido al formulario mediante el método 
AddRangef ) de la propiedad Controls. 

I na ventana marco MDI puede contener otras en su interior, concretamen¬ 
te ventanas que tengan el valor True en su propiedad IsMDIChild \ cuya 
propiedad MDI Paren t contenga una referencia a la ventana marco 

I.a dase MdiClient cuenta con una propiedad MdiChildren, que facilita 
una lista de todas las ventanas hija abiertas, y otra llamada Backgroundlmage, 
mediante la cual podemos establecer una imagen o gráfico de fondo en la ven¬ 
tana. Estas dos propiedades aparecen también en la clase Form. de tal manera 
que no es necesario usar explícitamente el objeto Mdi Client. 

Creación de un menú de opciones? 

El siguiente paso que daremos será crear un menú de opciones, realmente 
con una sola opción, que nos servirá para poder abril ventanas hija cada ve/, 
que lo necesitemos, lomamos un componente MainMenu del Cuadro de herra¬ 
mientas y lo insertamos en el formulario. Realmente aparecerá en la parte infe¬ 
rior del diseñador, mientras que en el formulario todo está preparado para que 
introduzcamos los títulos de las opciones. 

Introducimos como nombre de la opción principal Archivo y, Iras despla¬ 
zarnos abajo, facilitamos el título de la única opción: Nuevo En la figura I0. g 
puede ver el aspecto del menú durante la fase de diseño. Este es un aspecto 
que se ha mejorado sustancialmente respecto a versiones previas de Visual Ba 
sic, en las que el diseño de un menú resultaba bastante menos intuitivo. 

Lógicamente, la opción Archivo>Nuevo tendrá un código asociado va que. 
de lo contrario, de poco serviría. I lacemos doble clic sobre la opción, causando 
la generación «.leí código necesario para gestionar el evento Click. En su inte¬ 
rior introducimos las siguientes cuatro sentencias: 


Dim Vent.anaHija As frmarchivo * New frmArchivo() 

VentanaHija.MdiParent = Me 
Vent.anaH i ja . Show< ) 



«Editor 



Figura 10.9. Diseñamos el menú principal del formulario 

Lo primero que hacemos es crear un objeto de la clase f rmArchivo, una cla¬ 
se que, ciertamente, aún no hemos definido pero de la que nos ocuparemos de 
inmediato. Ese objeto será una ventana, un formulario, de la cual modificamos 
una propiedad: MdiParent. Con ella enlazamos esta nueva ventana con la que 
actuara como padre de ambas ventanas. Recuerde que en este contexto Me re¬ 
presenta al formulario principal. 

Finalmente utilizamos el método Show( ) para hacer aparecer la ventana. 
Este mismo método podríamos usarlo para mostrar cualquier ventana, aunque 
no fuese MD1. La ventana aparece como no modal, lo cual significa que puede' 
accederse a los otros elementos de la aplicación sin necesidad de cerrarla. Para 
mostrar una ventana modal usaríamos el método ShowModal( ). 

Diseño de la ventana hija MDI 

Si compilásemos el proyecto tal y como está ahora obtendríamos algunos 
errores, va que la clase frmArchivo, a la que se hace referencia desde el códi¬ 
go anterior, no existe actualmente. Vamos a crearla añadiendo un nuevo elemen¬ 
to al proyecto, concretamente un nuevo formulario. Para ello utilizaremos la 
opción Agregar nuevo elemento, como puede verse en la figura 10.10, seleccio¬ 
nando el elemento Windows Form. 

Añadiremos a este formulario tres componentes: un MainMenu, un Color- 
Dialog v un TextBox. De éste ultimo modificaremos la propiedad Muí tiline, 
asignándole el valor True. y la propiedad Dock. Esta cuenta con un editor 
especifico que, al ser desplegado (véase figura 10.1 I) nos permite seleccionar 
el área al que se adosará el control. En este caso seleccionamos el botón central, 
correspondiente al valor Fill, de tal forma que el TextBox ocupe todo el es¬ 
pacio disponible en la ventana. 

Utilizaremos el componente MainMenu para incorporar una opción, a la 
que llamaremos Cambiar color, cuya finalidad será abrir un cuadro de diálogo 
que permita al usuario seleccionar el color en el que desea el texto. Este cuadro 
de diálogo, como puede suponer, es el ofrecido por eJ componente Color- 
Dialog Hacemos doble clic sobre la opción, una vez añadida, e introducimos 
el código siguiente en el método generado: 





...IJ 


if ColorDialogl.ShowDialog() = 

Dial ogResu 1L.OK Then 

• •• • *!•’ • • • * n * • • ./••» . 

TextBoxl.ForeColor = ColorDialogl.Color 

End If 
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Figura 10.10. Añadimos un nuevo formulario al proyecto 
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Figura 10.11. Modificamos la propiedad Dock 
del componente TextBox 
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I lamamos al método ShowDialogt ) del componente ColorDialog para 
mostrar el cuadro de diálogo. Si dicho método devuelve el valor DialogRe- 
su 11. OK es que se ha seleccionado un color y cerrado la ventana pulsando el 
boton OK. caso en el cual tomamos el color elegido, de la propiedad Color, y 
lo usamos para modificar la propiedad ForeColor del TextBox. Es decir, 
cambiamos el color del texto que haya en la caja de texto. 

Unión de las piezas 

Nuestro provecto consta, en este momento, de dos módulos de código, cada 
uno de ellos correspondiente a un formulario. Si examina el código verá que 
ambos forman parte del mismo ámbito con nombre. De hecho, al compilar se 
genorarci un solo ensamblado. Por ello desde el formulario principal podemos 
crear un objeto de la clase f rmArchivo. el formulario hijo MQI. sin necesidad 
de utilizar archivos de cabecera ni establecer ninguna referencia. El desarrollo, 
por tanto, resulta mucho mas simple que usando otros lenguajes y entornos 

Puede ver el contenido del ensamblado, tras compilar el provecto, con la 
herramienta ildasmque ya usamos en un capítulo previo. Verá, como en la fi¬ 
gura 10.12, que aparte del manifiesto tenemos «.los clases Fíjese en la marca 
que distingue al método Main( ) de la clase Forml de los demás, indicando 
que es estático (compartido). Ese método ha sido creado automáticamente por 
Visual Basic v no lo vemos en el editor de código. 
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Figura 10.12. Contenido del ensamblado obtenido a partir del proyecto 







Al ejecutar el programa se encontrará, en principio, con la ventana mareo 
MDI vacia. Puede usar la única opción disponible para abrir una o más venta¬ 
nas de edición. Observe que el menú que habíamos definido en la ventana hija 
se integra con el principal, apareciendo en la ventana marco 

Trabajo con componentes 


I I trabajo con ventanas, ya sean de tipo MDI o cuadros de dialogo, no com¬ 
porta nuieha más complicación. Lo único que necesitamos, para construir cual¬ 
quier aplicación Windows con interfaz de usuario, es conocer los controles que 
aparecen en la pagina Windows Forms del Cuadro de herramientas. Kn su ma¬ 
yor parte son equivalentes a los controles que podíamos encontrar en Visual 
Basic 6. aunque con diferencias puntuales. 

Lo único que necesitamos, por tanto, es saber cual es la finalidad de cada 
componente, algo que, generalmente, es fácil deducir del nombre e icono que 
le representan. También precisaremos, obviamente, una descripción de las pro¬ 
piedades, métodos y eventos con que cuenta cada componente. Simplemente 
recorriendo la lista ofrecida en la ventana Propiedades tendremos parle de esa 
inlormacion. Por lo demás, la ayuda de Visual Basic Nf;T contiene informa¬ 
ción de referencia de cada componente v cada uno de sus miembros. 

Desde una aplicación Windows, aparte de contar con una interfaz de usua¬ 
rio para solicitar y mostrar información, suelen necesitarse otros elementos co¬ 
mo componentes para el acceso a datos o a reglas que se ejecutan remotamente. 
F.sla necesidad, no obstante, no es exclusiva de las aplicaciones basadas en 
Wiihiou's l onas y, por ello, las abordaremos de una Inrma más general en capí¬ 
tulos posteriores. 

Aparte de los controles inicialmenle v isibles en el Cuadro de herramientas, 
podemos Usar la opción de personalización, en el menú emergente, para acce¬ 
der a la ventana mostrada en la figura 10.13. Desde ella podemos instalar otros 
componentes, tanto componentes NLI como componentes COM, que estén 
registrados en el sistema. 


Miembros comunes 

Aunque, como acaba de indicarse, podemos instalar tantos nuevos compo¬ 
nentes como sean necesarios, lo cierto es que en la mayoría de nuestros diseños 
de interfaz de usuario utilizaremos siempre un conjunto limitado de controles: 
botones, cajas de texto, listas, etiquetas, cajas de selección, botones de radio v 
cuadrículas de datos son algunos de ellos Estos controles están representados 
por las clases Button. TextBox, ListBox, Label, CheckBox, RadioButton 
v DataGrid todas ellas derivadas, directa o indirectamente, de la clase Con¬ 
trol que, a su vez, es una derivada de Component. Esta raíz común, como 
podrá suponer, aporta una serie de miembros comunes a todos esos compo¬ 
nentes, miembros que podemos conocer de manera general. 




Figura 10.13. Añadimos nuevos componentes al Cuadro de herramientas 

La clase Control se encarga de gestionar la posición y las dimensiones del 
control, procesar la introducción de información a través del teclado v el ratón, 
controlar el anclaje y adosado en el interior de otros controles o administrar el 
toco de entrada v el orden de acceso. Todas estas tareas, por tanto, tan sólo 
tendremos que abordarlas una vez v, posteriormente, aplicarla a cualquiera de 
las clases de control derivadas de Control. 

n&ipngs_ 

Todos los controles mencionados se diseñan para ser insertados en un conte¬ 
nedor, concretamente en un lormulario Windows. Por ello cuentan con propie¬ 
dades que mantienen la posición del control dentro del contenedor, asi como 
las dimensiones. Son datos que se establecen en puntos de pantalla, como es 
habitual en la mayoría de las herramientas de desarrollo, v no en tu'tp* como 
ocurría en Visual Basic h. 

La posición se aloja en las propiedades Lef t y Top, que representan el pun¬ 
to horizontal y vertical, respectivamente, de la esquina superior izquierda 
donde aparecerá el control. Lef t y Top son de tipo Integer, es decir, contie¬ 
nen directamente el punto horizontal y vertical. También la propiedad Loca- 
tion mantiene esa misma información, en este caso en forma de una estructura 
Point. Dicha estructura cuenta con dos propiedades, X e Y, que mantienen el 
punto horizontal v vertical, así como una serie de métodos v de operadores 
que permiten operar sobre ese punto (X, Y) para trasladarlo en el plano, compa¬ 
rarlo con otro punto, etc. 

F.l tamaño del control también podemos obtenerlo de distintas propieda¬ 
des Por una parte están Height y Widthque, al igual que Left y Top, son de 
tipo Integer. Contienen el numero de puntos del alto y ancho, respectó ámen¬ 
te, que tiene el control. Si no nos interesan las dimensiones sino el punto de la 
esquina opuesta del control, la esquina interior derecha, nos serviremos de las 
propiedades Right v Bottom. 





lambién podemos recuperar toda la información relativa a posición y di¬ 
mensiones leyendo la propiedad Bounds, de tipo Rectangle La estructura 
Rectangle dispone de cuatro propiedades: X, Y, width y Height, contenien¬ 
do posición horizontal, posición vertical, ancho y alto del control. Al igual que 
Point, la estructura Rectangle dispone de una serie de métodos que faci¬ 
litan ciertas operaciones con áreas rectangulares, como: aumento o reducción 
di- dimensiones, unión, intersección, etc. Una propiedad similar a Bounds os 
ClientRectangle, si bien en este caso la estructura contendrá el valor 0 en X 
e Y y las dimensiones en Width y Height. 


Nota 

Las propiedades citadas no son meramente informativas. Podemos modifi¬ 
car el valor de cualquiera de ellas para alterar la posición o el tamaño del 
control que corresponda. 


Por ultimo, en lo relativo a la posición y dimensiones de los controles, citar 
los métodos SetBoundsf ), SetLocation( ) v SetClientArea< ), median¬ 
te los cuales podemos establecer las coordenadas del control, su posición o su 
lama ño, res pect i va m en te. 

1 ( 5 ri de acce&o y foco de entrada 

Muchos de los controles que se introducen en un formulario, como pueden 
ser las cajas di* texto, las listas y los botones, son capaces de tomar lo que se co¬ 
noce como el foco de entrada. F,l componente que tiene el foco suele aparecer re¬ 
saltado con un borde más grueso, caso de los botones; mostrando un cursor en 
su interior, como en las cajas de texto, o usando un recurso similar. Con ello in¬ 
dican que cualquier introducción de dafos que efectuemos, usando el teclado, 
irá dirigida a ese control, al control que tiene el foco. 

Cuando se abre un formulario el foco do entrada lo toma el primer control 
según el orden de acceso previamente establecido durante el diseño. Para pa¬ 
sar el foco de entrada de un control al otro, según ese orden, se usa el tabulador. 
Ln caso de que así interese, un control puede quedar fuera de ese acceso me¬ 
diante el tabulador. Las propiedades implicadas son Tablndex y TabStop. 
La primera mantiene un índice que establece el orden de los controles, mien¬ 
tras que la segunda indica si un componente debe tomar o no el foco de entra¬ 
da medíanle el tabulador. Ln principio el orden de acceso a los controles viene 
determinado por el orden en el que se han insertado en el contenedor. No obs¬ 
tante, podemos modificar dicho orden alterando la citada propiedad Tablndex, 
aunque resulta mucho más cómodo usar la opción Ver>Orden de tabulación. 
Al seleccionarla, v suponiendo que tiene insertados varios controles en el for- 
mulario. verá aparecer junto a cada uno de ellos un recuadro con un numero 
que, en realidad, es el contenido de la propiedad Tablndex (véase figura 10.14). 
hl cursor cambia de forma al situarlo sobre los controles. Pulsando el botón 
principal del ratón iremos estableciendo el nuevo orden que deseemos. 
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Figura 10.14. Establecemos el orden de acceso a los controles mediante 
el tabulador 


Nota 

Para volver al modo de diseño habitual, pudiendo insertar y personalizar 
los componentes, seleccione de nuevo la misma opción Ver>Orden de ta¬ 
bulación. 


Si en el ejemplo de la figura 10.14 no deseamos que la lista, el control que 
hav a la derecha mayor que los demás, sea accesible mediante el tabulador no 
tenemos mas que dar el valor Falsea la propiedad TabStopque, por defecto, 
siempre loma el valor True. Aunque demos el valor False a la propiedad 
TabStop, un control podrá seguir tomando el toen» do entrarla medíanle otros 
medios, por ejemplo pulsando sobre el con el botón principal del ratón. Cual 
quier control que este visible y activado, salvo algunas excepciones, puede to¬ 
mar el toco de entrada Para verificar si un control puede o no tomar el foco de 
entrada no hav mas que comprobar el valor de su propiedad CanFocus. Si 
contiene True es que existe esa posibilidad, teniendo False en caso contrario. 

También podemos determinar si un control tiene actualmente o no el toco 
de entrada consultando la propiedad Focused Esta, al igual que CanFocus, 
es de tipo Boolean v solo de lectura. Si contiene el valor True significara que 
ese control tiene el foco de entrada. 

I o habitual es que el toco de entrada pase de un control a otro a demanda 
del usuario, va sea usando el tabulador o la selección directa mediante el ratón 
o un acceso rápido. I n ciertos casos, sin embargo, podemos necesitar estable¬ 
cer el loco de entrada desde código, como respuesta a alguna acción. I.s algo 
que vimos en el primer ejemplo propuesto en este capitulo, en el que utilizába¬ 
mos el método Focus( ) para desplazar el loco desde el bolón, que lo obtenía 
al ser pulsado, a la caja de texto que había a la izquierda. 

Anclaje .y adosado de controla 

Un aspecto que se ha mejorado considerablemente, comparando los servi¬ 
cios de formularios Windows con los formularios de Visual Basic b, es el ajuste 




automático de la posición v dimensiones de los componentes en el interior de 
sus contenedores I n Visual Basic h no era extraño tener que responder al even¬ 
to Resize para, mediante cálculos matemáticos, ajustar los controles \ ionse- 
guir una presentación consistente, 

I n Visual Studio NI I toda esa codificación manual puede evitarse frailas 
a la existencia de las propiedades Anchor v Dock 

l a primera establece los punios de anclaje del control respecto a su conté 
ni'doi. Puede contener. mediante combinación lógica, uno o mas de los valores 
enumerados en la tabla 10.2. 

Por delecto lodos los controles tienen los \ alores Lef t v Top. de tal manera 
que mantienen su posición estática en el formulario relativa a la esquina supe¬ 
rior izquierda de este 

Tabla 10.2. Valores de la enumeración AnchorSty tes 


Valor 

Punto de anclaje 

None 

Ninguno 

Left 

Izquierdo 

Top 

Superior 

Right 

Derecho 

Bottom 

Interior 


Si desea que un cierto control conserve su posii ion relativa a la esquina in¬ 
terior deri'i’ha, por ejemplo un bolón que haya situado en esa posición, no ten 
dría mas que modificar la propiedad Anchor eliminando los valores Left v 
Top \ asignando Right \ Bottom. I’uede hacer eslo durante la tase de diseño 
en la ventana de propiedades (véase liguta 10.15) o bien con una sentencia co¬ 
mo la siguiente 

BiilI on t . Anchor AnchorStyles.Right Or AnchorSty I es . Bot tom 

I n caso ile que la propiedad Anchor di* un control tenga dos v«llores opues- 
los. como Left \ Right o Top \ Bottom, lo que conseguiremos es que el an¬ 
iño o alio del control, respei liv«miente, se adecúen a los cambios de tamaño del 
contenedor. Puede hacer una prueba simple pero que le permitirá comprender 
l.u ilmente el funcionamiento de Anchor. Partiendo de un tormulario como el 
de la tigura 10.14, en el que existen varias cajas de texto y etiquetas, una lista \ 
tres botones, liaremos los cambios siguientes; 

• Seleccionamos la lista v, desplegando el editor de la propiedad Anchor 
en lii ventana Propiedades, activamos los valores Right \ Bottom sin 
desactivar los dos que aparecen manados por detecto. 

• l'legimos conjuntamente los tres botones que* hav en la paite interior, des¬ 
plegamos el mismo editor de la propiedad Anchor n desactivamos los 
valores Left v Top para activar Right v Bottom. 





Figura 10.15. La propiedad Anchor dispone de un editor visual que facilita 
la modificación 


Para seleccionar varios controles de manera conjunta puede pinchar sobre 
ellos con el botón principal del ratón mientras mantiene pulsada la tecla 
Mayús, o bien trazar con el botón principal del ratón un recuadro en el que 
estén incluidos esos controles. 

I lechos esos cambios, al ejecutar el programa v *1 llorar el tamaño de la ven¬ 
tana vera que las dimensiones de la lista se ajustan en consecuencia, ocupando 
siempre la mayor parte del espacio disponible Los botones, por su parte, se 
desplazarán abajo v a la derecha para evitar la superposición sobre la lista I a 
figura 10. Ib miles! ra la ventana, en ejecución, tras haber aumentado el ancho v 
alto. 

Para conseguir esto mismo en Visual Basic ó no temamos mas remedio que 
es» libir código con el tin de realizar manualmente los ajustes. 

Oirá forma de mantener un control en una posición tija, independionlemon- 
te de que las dimensiones del contenedor se vean alteradas en eje» nnon, consis¬ 
te en adosarlo a un cierto margen de éste. C on ese tin se usa la propiedad Dock 
que. por regla general, toma por defecto el valor None de los enumerados en la 
tabla ID \ f aunque algunos controles, como puede ser StatusBar, asignan ini¬ 
cialmente un valor distinto. 






I _ 


Figura 10.t6. Los controles de la ventana se ajustan automáticamente 
a los cambios de tamaño 

Tabla 10.3. Valores de la enumeración Dockstyle 

Valor El control se adosa 

None No se adosa 

Bottom A la parte inferior del contenedor 

Top A la parte superior del contenedor 

I.ef t A la parte izquierda del contenedor 

RigtiL A la parte derecha del contenedor 

Fill Ocupando todo el espacio disponible en el contenedor 

Al igual que Anchor la propiedad Dock dispone de un editor \ isiuil especi¬ 
fico que permite seleccionar fácilmente el punto ni que deseamos adosar el con¬ 
trol Inserte en el tormuLirio un componente StaiusBar, cuyo lin es servir 
como linea de estado en una ventana. Vera que se ajusta automáticamente a la 
parle interior, sin importar los cambios en las dimensiones de la ventana. Pue 
de modificar la propiedad Dock para situar la barra en la parte superior, iz¬ 
quierda, derecha u ocupar toda la ventana. 

Usadas tonjuntamenle. estas dos propiedades simplifican enormemente el 
diseño de ínterTaces de usuario que se adaptan sin problemas a la modilit ación 
de las dimensiones iniciales de la ventana sin. por ello, tener que escribir codi 
go alguno. 

Eventos dr t rcYaáo y ratón 

l.a mayoría de los controles que usaremos para diseñar inlerlaces de usua¬ 
rio Windows se encargan de gestionar adecuadamente los eventos generados 





por teclado y ratón, principales dispositivos de introducción de información 
por parte del usuario. Nada nos impide, sin embarco, responder personalmen¬ 
te a esos eventos con código a medida. 

I as actuaciones sobre el teclado son susceptibles de generar tres eventos di 
lerentes: KeyDown, Keyüp v KeyPress. I os dos primeros se generan para to¬ 
das las teclas en el momento en que se pulsan v se liberan, respecto ámente. Ll 
último se produce cuando la tecla pulsada tiene asociado un código de carác¬ 
ter, es decir, no se trata de una tecla de desplazamiento del cursor o una tecla 
de función o edición. 1 os eventos Keylíp y KeyPress reciben como parámetro 
una estructura Key Even t Args. en la que existen diversos miembros informa 
ti vos I I mas importante es KeyCode, conteniendo el código de la tecla pulsa 
da o liberada. Ademas podemos comprobar si oslaban pulsadas las teclas Alt 
Control o Mayús mediante los miembros Alt, Control \ Shift. respectiva¬ 
mente. Éstos contendrán el valor True en caso de que estuvieran pulsadas o 
bien False en caso contrario. El evento KeyPress recibe un parámetro de li- 
po KeyPressEventArgs, cuyo miembro KeyChar aloja el carácter corres 
pendiente a la tecla pulsada. 

En cuanto al ratón, los eventos más habituales son MouseDown, MouseMove 
v Mouseüp. Se producen al pulsarse un bolón del ratón sobre el control, des¬ 
plazar el puniere del ratón o liberar el bolón, respectivamente Adicionalmente 
también se generan los eventos MouseEnter, MouseHover v MouseLeave, 
que denotan la entrada del puntero del ratón sobre el área que ocupa el control, 
la permanencia sobre el y la salida cuando el puntero se desplaza a otro punto. 

I os fres primeros eventos reciben un parámetro con los miembros necesa¬ 
rios para saber qué bolon ha sido el pulsado, cuál es la posición actual del pun¬ 
tero o bien la medida en que se ha desplazado la rueda del ratón si es que este* 
cuenta con una. 


Nota 

Usando el evento MouseWheel podemos actuar ante un desplazamiento 
de la rueda del ratón, sin necesidad de atender al resto de los eventos de 
este dispositivo. 


La clase Control dispone de tres propiedades compartidas, que podemos 
utilizar a través de cualquier control o bien directamente' disponiendo el nom¬ 
bre de la clase y un punto, que alojan información sobre el estado de las teclas 
Alt. Control y Mayos, el estado de los bolones del ratón v la posición del pun¬ 
tero. Esas propiedades son Mod if ierKeys, MouseButtons vMousePosition 
l as tres son solo de lectura v podemos utilizarlas desdé cualquier punto para 
actuar en consecuencia o modificarel comportamiento por delecto del control, 
sin necesidad de estar en el método asociado a uno de los eventos de ratón o 
teclado. 

Con el fin do ver en la practica como utilizar algunas de las propiedades v 
eventos mencionados, principalmente los de teclado v ratón, vamos a servir 





nos de un sencillo ejemplo. Partiremos de una nueva aplicación basada en for¬ 
mulario Windows, formulario en el que insertaremos dos controles Button, 
un RadioButton y un componente Timer. liste último aparecerá en la parte 
interior del diseñador al tratarse de un elemento no visual. 

Modificamos la propiedad Text de los primeros tres controles dejándola 
vacía. Ajustamos el tamaño v la posición de los bolones para conseguir l.i apa¬ 
riencia de la figura 10.17 que, aunque vagamente, recuerda al clásico juego de 
la pelota v las dos paletas que es conocido como Poitg. Modificamos la propie¬ 
dad Anchor del botón situado a la derecha desactivando el valor Lef t v acti¬ 
vando Right. De esta forma si se modifica el ancho del formulario en ejecución 
la paleta siempre se mantendrá en el margen derecho También daremos el v a¬ 
lor True «i la propiedad Checked del RadioButton, a fin de que aparezca co¬ 
mo seleccionado. 



Figura 10.17. Aspecto del formulario en la fase de diseño 


Id componente Timer se usa para generar un evento periódico que, en este 
caso concreto, nos servirá para ir actualizando la posición del RadioButton 
simulando su movimiento por la ventana. Asignamos el valor 20 a la propie¬ 
dad Interval, de tal forma que el evento se produzca cada 20 milisegundos. 
F,1 valor inicial de la propiedad Enabled, que determina si el control genera o 
noel evento, inicialmente será False. 

Por último, en lo que a establecimiento de propiedades se refiere, daremos 
el valor True a la propiedad KeyPreview del propio formulario. De esta ma¬ 
nera solicitamos que cuando se pulse una tecla, que debería ir dirigida al con¬ 
trol que tenga el foco de entrada en ese momento, los eventos correspondientes 




se generen primero en el formulario, lo cuál nos permitirá controlarlos de ma¬ 
nera general sin tener que gestionar el evento KeyPress de los dos botones y 
el RadioButton. 

A continuación asociaremos el código siguiente a los eventos Tick del con¬ 
trol Timer y KeyPress, MouseMove y Mouseüp del formulario. 

i MI ^ h . u i J .11> . . . J . . 1 > í I % ¡ . tli i i( i* ; '• í S . 1 1» • 


Prívate dx As Integer * 1, dy As Integer - 1 

N > U..r i . i : • I» i í . b V • I • • • 

Prívate Sub Timerl_Tick(ByVal sender As System.Object, 

ByVal e As System.EventArgs) Handles Timerl.Tick 

i..» ‘ iua 1 .* »•/•>. . i': O*- . K 1 •. b 1 * M 

RadioButton 1.Left +* dx 
RadioButtonl.Top +» dy 

í>’«pf?nd londo <ic- !.i prmi.ion Paci \’ o>. 

ÍM9 viiiabl^í «i¡r ' ... m- ‘ ,t 

* #• ? r^í>oi ^ ,‘oe. .íert íIi* n, ir-«. j« .> 

dx ** 11 f ( RadioButton 1 . Location . X >= _ 

Me.ClientSize.Width — RadioButton 1.Width, -1, dx) 
dx » 11f(RadioButton1.Location.X * 0, 1, dx ) 
dy = IIf(RadioButtonl.Location.Y >« _ 

Me.ClientSize.Height - RadioButton 1.Height, -1, dy) 
dy * Ilf(RadioButtonl.Location.Y - 0, l f dy) 

End Sub 

A i O • • ' i. <r l« • a Mi'ÜrT- i l»i'i !• I •*-♦. j 

Prívate Sub Forro 1 KeyPress(ByVal sender As Object, 

ByVal e As System.Windows.Forma.KeyPressEventArgs) 

Handles MyBase.KeyPress 

w. . r* * ím>* .-*f- :• »»M . •* »■« Vi 

Buttonl.Top - = IIf(Char.ToUpper(e.KeyChar) = "Q", 5, 0) 
Buttonl.Top += I1f(Char.ToUpper(e.KeyChar) = "Z", 5, 0) 

End Sub 


Prívate Sub Forro1 MouseMove(ByVal sender As Object, 
ByVal e As System.Windows.Forms.MouseEventArgs) 
Handles MyBase.MouseMove 

iM*. *>moa J L».'i'r~r i <** • 

Button2.Top * e.Y 

End Sub 


* +1 r A • * • l»n (.>’• . .T»- :: h ,»♦. - 

Prívate Sub FormlMouseUp(ByVal sender As Object, 

ByVal e As System.Windows.Forms.MouseEventArgs) 

Handles MyBase.Mouseüp 

Timer1.Enabled = e.Button = MouseButtons.Left 

End Sub 


Los comentarios introducidos describen la finalidad de cada método Bási¬ 
camente, activamos y desactivamos la generación del evento Tick por parle 



del Timer mediante la pulsación de los botones del ratón, mientras que el des¬ 
plazamiento de éste y la pulsación de ciertas teclas modifican la posición verti¬ 
cal de los botones. El RadioButton va desplazándose gracias al código asociado 
al evento Tick. código que habría que completar para detectar la colisión con 
los botones v evitar que la supuesta pelota los atraviese. 

Arreglos de controles 

Una tei nica bastante habitual en Visual Basic 6, a la hora de crear interfaces 
de usuario complejas con multitud de controles, consiste en crear arreglos de 
controles. No hay mas que copiar un control y después pegarlo para crear esc 
arreglo con varios controles del mismo tipo y con el mismo nombre, diferen¬ 
ciándose unos de otros por un índice almacenado en la propiedad Index. Esta 
posibilidad ya no existe en Visual Basic .NF.T o, para ser mas exactos, digamos 
que no es necesaria. 

La construcción de arreglos de controles simplificaba determinados traba¬ 
jos al permitir, por ejemplo, la edición de sus propiedades en un simple bucle o 
la codificación de gestores de eventos genéricos, evitando asi la apertura de un 
método para cada uno de los controles. Para verlo en la práctica vamos a partir 
de una interfaz simple pero relativamente tediosa: en un formulario necesita¬ 
mos ocho botones que, teóricamente, efectuarán una operación distinta sobre 
un mismo objeto. Esta interfaz podría ser la de la figura 10.18. 



Figura 10.18. Aspecto del formulario que necesitamos 


Insertar ocho botones iguales no es un trabajo que requiera mucho esfuerzo, 
ciertamente, pero ahora es necesario establecer un título para cada uno de ellos, 
ajustar propiedades de anclaje, color y, en general, adaptar sil apariencia. Lo 
mismo ocurrirá con el comportamiento, debiendo escribir un método asociado 
al evento Click de cada botón para, en definitiva, llamar a un método diferente 
de un mismo objeto según el supuesto que se ha propuesto hace un momento. 

Si ese trabajo de personalización e implemenlación de funcionalidad lo ex¬ 
trapolamos de este ejemplo, bastante sencillo, a una aplicación real, con cien¬ 
tos de componentes, el esfuerzo lógicamente no será tan nimio Para reducirlo 
podemos utilizar algunas de las técnicas que van a describirse en los puntos si¬ 
guientes. 





la colección de controlen 


La clase Form, al igual que oirás derivadas de Control, dispone de una 
propiedad de tipo ControlCollection. F.n el caso de Formesa propiedad se 
llama Controls v, como puede suponer, contiene la colección de controles 
que hay insertados en el formulario. 

Anteriormente vio que el diseñador, a medida que insertamos controles en 
el formulario, se ocupa de generar el código necesario para crear los controles 
y añadirlos a esa colección. 

Al igual que cualquier otra colección, los elementos deControlCollection 
pueden ser enumerados mediante For Each/Next, sabiendo que cada elemen¬ 
to será un objeto de la clase Control o de una clase derivada. I amblen pode¬ 
mos saber el numero de elementos de la colección consultando la propiedad 
Count y usar la propiedad Item como si de un arreglo se Iratase, accediendo a 
los elementos de manera individual. 

No hay que olvidar que la colección mantiene los elementos bajo el tipo ge¬ 
nérico Control, lo cual hace posible el uso polimóríieo de todos ellos, F.n oca¬ 
siones, sin embargo, puede ser necesario comprobar el tipo real, por ejemplo 
mediante el operador TypeOf. o incluso convertir la referencia genérica al tipo 
adecuado, mediante la función CType( ). 

Suponga que, tomando como punto de partida el formulario de la figura 
10.18, desea establecer un titulo individual para cada botón Haga doble clic 
sobre el fondo del formulario para abrir el método asociado al evento Load v, 
a continuación, introduzca el código siguiente: 

Prívate Sub Forro 1 Load(By Val sender As System.Object , 

ByVal e As SysLem.EvenLArgs) Handles MyBase.Load 

Dim UnControl As Control 

Dim Titulo() * {"Primero", "Anterior", “Siguiente", "Ultimo", 
“Añadir", "Eliminar", "Editar", "Aceptar") 

Dim Indice As Integer 


For Each UnControl In Me. Controls 

If TypeOf UnControl Is Button Then 

UnCont.ro l .Text * Ti tulo(Indice) 

Indice l 

End If 
Next 
End Sub 

Usando esta misma técnica podríamos establecer las propiedades que fue¬ 
ran necesarias para cualquier conjunto de controles La colección Control¬ 
Collection no tiene las limitaciones existentes en los arreglos de controles 
de versiones previas de Visual Basic, ya que los controles no tienen por que te¬ 
ner el mismo nombre, ni siquiera tienen que ser del mismo tipo. 
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C asi mas interesante que el acceso genérico a las propiedades o métodos de 
los controles, utilizando el sistema que acaba de explicarse, resulta la posibili¬ 
dad de utilizar un único método como gestor de eventos de varios controles o, 
incluso, varios eventos distintos siempre que el tipo de delegado sea compati¬ 
ble. ésto puede ahorrarnos bastante trabajo al evitar la codificación repetitiva 
tie una lógica similar o, incluso, idéntica. 

Si estamos asignando los gestores de eventos desde el diseñador de visual, 
lo que haremos sera crear el gestor para el primer evento del primer control 
usando el método habitual: doble clic sobre el control si es para usar el evento 
por delecto o despliegue de la lista de eventos que hay en la parle superior del 
editor, Después bastara con ir añadiendo tras la clausula Handles el nombre 
de los controles v eventos a gestionar. 

Haga doble clic sobre el primero de los botones del formulario del ejemplo 
anterior v, a continuación, modifique el código para que quede asi: 

Private Sub BuUon 1_C lick ( 

ByVal sender As System.Object, ByVal e As System.EventArgs) 

Handles Buttonl.Click, Button2.Cli.ck, Bu t ton 3 . En Ler 
MessaqeBox.Show(CType(sender, Button}.TexL) 

End Sub 

Observe que hemos añadido el evento Click del segundo botón v el evento 
Enter del tercero a la lista de eventos a controlar por este gestor I n su inte¬ 
rior nos limitamos a mostrar en una pequeña ventana el título del botón sobre 
el que se ha pulsado o que ha generado el evento Enter. Al ejecutar el progra¬ 
ma podrá ver cómo el mismo método gestiona esos tres eventos. 


Nota 

El parámetrosender recibido por todos los gestores de eventos es una re¬ 
ferencia al componente que ha generado el evento, el dato que nos permi¬ 
tirá determinar de dónde procede ese evento y actuar en consecuencia. 


Como va sabe, el uso de la cláusula Handles tiene como alternativa la sen¬ 
tencia AddHandler que conocimos en un capítulo previo. Tomando como ba¬ 
se el código del punto anterior, en el que utilizamos un bucle para establecer 
los títulos de los botones, añada la siguiente línea al interior del bucle: 

AddHandler UnControl.Click, AddressOf ClicBoton 

L.l método ClicBoton. ahora mismo inexistente, sería el encargado de ges¬ 
tionar el evento Click de los ocho botones que hay en el formulario, diteren 
liando uno de otro mediante el parámetro sender: 

Private Sub ClicBotoncByVal sender As Object, 

ByVal e As System.EventArqs) 



Select Case CType (sender, Button).Text 
Case "Anterior" 

MessaqeBox.Show("Nos vamos a la fila anterior") 

Case "Siguiente" 

MessaqeBox.Show("Nos vamos a la fila siguiente") 

Case "Primero" 

MessaqeBox.Show("Nos vamos a la primera fila") 

Case "Ultimo" 

MessaqeBox.Show("Nos vamos a la ultima tila") 

Case "Artadir" 

MessaqeBox.Show("Añadirnos una nueva fila") 

Case "Eliminar" 

MessaqeBox.Show("Eliminamos la fila actual") 

Case "Editar" 

MessaqeBox.Show("Editamos la fila actual") 

Case "Aceptar" 

MessaqeBox.Show("Aceptamos los cambios") 

End Select 

End Sub 

En la practica, como es lógico, no nos limitaríamos a mostrar un mensaje* 
sino que llevaríamos a cabo la tarea que correspondiese al botón pulsado. Lo 
importante es que la técnica para compartir el gestor e identificar la proceden¬ 
cia del evento es la misma que acaba de describirse. 

Creación de controles» en ejecución 

Ya que podemos establecer propiedades v asignar gestores a eventos de ma¬ 
nera genérica, usando la colección ControlCollection v las técnicas aprendi¬ 
das en los puntos anteriores, la única tarea que tendríamos que efectuar desde 
el diseñador, a la hora de componer una interfaz de usuario, es la inserción de 
los componentes. Habitualmente resulta más cómodo hacer este trabajo median¬ 
te operaciones de arrastrar y soltar que escribiendo código, pero eso no signifi¬ 
ca que no podamos hacerlo. 

Los componentes son objetos v. como tales, podemos crearlos .1 partir de 
sus respectivas clases, como hemos hecho repetidamente en capítulos previos 
con clases que no eran componentes. Una vez creados, no tenemos más que 
utilizar el método Add( ) do la colección ControlCollecLion para añadirlos 
al formulario o, en su caso, al contenedor que corresponda. 

Lara ver un ejemplo puede partir de un nuevo formulario en blanco, hacer 
doble clic sobre el e insertar el código siguiente que, como puede ver, recrea 
los mismos ocho botones que temamos en el ejemplo usado hasta ahora, l a di¬ 
ferencia es que todo el trabajo se electúa mediante código. 

For Indice ~ 1 To 8 

UnControl New Buttoní) 
with UnControl 

•Text * Titalo{Indice - 1) 


.Top - {(Tndice - 1) Mod 4) * (.Height ► 20} * 20 



. Left. * TIf(Tndice <= 4, 20, 40 + UnConLrol . Width) 

End With 

Controls.Add{UnControl) 

Hext 

I d posición Id calculamos a partir del índice del bucle v utilizando operado¬ 
res aritméticos v lógicos para disponerlos en dos columnas de cuatro tilas. 


Herencia vi^ua 


Cada vez que añadimos un nuevo formulario a nuestro proyecto estamos de¬ 
rivando una clase tomando como base la dase Form que, como ya sabe, es un 
formulario genérico, vacío. Cuando va a desarrollarse un proyecto importante 
es habitual usar un diseño base común para todas las ventanas, por ejemplo con¬ 
tando con un fondo tipo anagrama de empresa, unos botones comunes de ayu¬ 
da o cierre, etc. Estos elementos, con lo que hemos visto hasta ahora, tendríamos 
que añadirlos en cada nuevo formulario, representando un trabajo repetitivo. 

Visual Basic .NF.T cuenta con una posibilidad, inexistente en versiones pre¬ 
vias, que podríamos denominar como herencia vi<na¡. Se trata de crear un for¬ 
mulario base v, posteriormente, utilizarlo para derivar a partir de él el resto de 
los formularios del proyecto, hl formulario base puede alojarse en el mismo pro¬ 
véelo, que seguramente es lo ideal, o bien disponerse en un ensamblado indepen¬ 
diente, caso en el cual seria necesario importar el ámbito correspondiente 

F.s fácil de entender la utilidad v el uso de la herencia visual simplemente po¬ 
niéndola en práctica, iniciamos un nuevo proyecto de aplicación para Window s 
v, en el formulario que aparece, insertamos unos botones en la parte interior 
derecha, modificando sus títulos y la propiedad Anchor para que permanez¬ 
can siempre ajustados en esa posición. Si lo deseamos, podemos asociar algo 
de código al evento Click de cada uno de ellos. Antes de continuar hay que 
compilar la aplicación. 

Acto seguido desplegamos el menú Proyecto y luego seleccionamos la op¬ 
ción Agregar formulario heredado. En la primera venlana que aparece introduci¬ 
mos el nombre que se dará al nuevo formulario, tras lo cual veremos el cuadro 
de diálogo de la figura 10.19. En él aparecen todos los formularios existentes 
en el proyecto actual y que podemos utilizar como base del nuevo También po¬ 
dríamos pulsar el botón Examinar para abrir cualquier otro módulo que conten¬ 
ga un formulario para derivar de el. 

El nuevo formulario mostrará exactamente la misma apariencia que el toma¬ 
do como base. Ademas, los controles insertados en este aparecen en el nuevo 
bloqueados, de forma que no podemos alterar sus propiedades. En ese momen¬ 
to podemos personalizar el formulario, por ejemplo añadiendo los elementos 
específicos para la funcionalidad que vaya a tener. Parte del traba|o, sin embar¬ 
go, ya lo hemos heredado del formulario base. Si comprueba el código de éste, 
como se ha hecho en la figura 11).20, verá que la clase base no es System. Win¬ 
dows . Forms . Form sino la clase de formulario creada con anterioridad. 




Figura 10.19. El cuadro de diálogo para seleccionar la base 
de un formulario 



Figura 10.20. El formulario base en la parte superior, el derivado en el centro 
y su código en la parte inferior 


Puntos clave 


1 os formularios Windows son parle de los servicios que la plataforma 
Microsoft NFT ofrece para el sistema operativo Windows, servicios que 
pueden ser usados desde todos los lenguajes .NE I. 















• l .i clase base de lodos los formularios es Form, definida en el ámbito 
System. Wi ndows . Forms. Dicha dase implementa la lundonalidad ha- 
sica de una ventana Windows 

• Visual Basic .NI I cuenta con un diseñador visual que facilita la creación 
de formularios mediante operaciones de arrastrar v soltar y la edición de 
propiedades. 

• Las aplicaciones basadas en formularios Windows utilizan un objeto de 
la clase Application para controlar todo el proceso. 

• Una aplicación Windows puede contar con múltiples ventanas, va sean 
independientes, de tipo MD1 o cuadros de diálogo. 

• Al iniciar una aplicación Windows automáticamente aparecen en el Cua¬ 
dro de herramientas los controles usados mas habitualmente Util i/ando 
el menú emergente podemos añadir cualesquiera otros controles que pu¬ 
diéramos precisar. 

• Lodos los controles Windows están derivados de la clase Control, por 
lo que cuentan con un conjunto común de miembros: propiedades, méto¬ 
dos \ eventos. 

• Las nuevas características de los formularios Windows, respecto a los 
formularios de Visual Basic h, hace que el diseño de interfaces de usuario 
sea mas fácil. 

• I .os controles pueden anclarse de manera relativa a su contenedor, adap¬ 
tando su posición v dimensiones en caso de que el tamaño de dicho conte¬ 
nedor sea modificado. 

• Iodos los controles disponen de eventos comunes que permiten respon¬ 
der .1 la introducción de datos desde el teclado y el ratón. 

• I os formularios disponen de una propiedad, llamada Controls, de tipo 
ControlCollection en la cual se almacena la colección de controles 
existentes en la ventana. 

• Usando dicha propiedad es posible modificar los loiiI roles existentes, asi 
como añadir otros nuevos. 

• Mediante la herencia visual es posible crear nuevos formularios deriván¬ 
dolos no de System .Windows . Forms . Forin sino de i lases de formula 
rios propias, ahorrando asi parte del trabajo de diseño. 


Resumen 


Salvo las dileroncias propias debidas a los cambios que se han producido en 
el lenguaje, v que causan, por ejemplo, que el formulario v los controles pue¬ 
dan ser Matados de numera más flexible gracias a las características de orienta 
cion a objetos, lo cierto es que el diseño de interfaces de usuario v, en genmal, 



t*l desarrollo de aplicaciones con Visual Basic .NRT se asemeja bastante al que 
conocíamos de versiones previas. Básicamente no hay más que arrastrar v sol 
tar componentes, personalizarlos mediante la edición de propiedades y asociar 
la funcionalidad mediante los eventos. 

Lógicamente, es necesario conocer todos los componentes con que cuenta 
Visual Basic NFT para poder aprovecharlos en nuestros proyectos. En este ca¬ 
pitulo, sin embargo, nos hemos centrado más en el proceso general del trabajo, 
sin entrar a describir todos los detalles de cada objeto lo cual requeriría un es¬ 
pacio considerable. Esa información, además, ya la encontramos en forma de 
referencia en la propia ayuda del producto. 

I ras leer este capítulo, por tanto, ha adquirido las nociones necesarias para 
comenzar a desarrollar aplicaciones Windows, sirviéndose para ello del apovo 
que supone la documentación electrónica. 
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Formularios Web 


Cada ve/ es mayor el nú moro do empresas quo optan por usar la arquitectu¬ 
ra do Internet, mis protocolos v servicios, tomo medio para conectar los siste¬ 
mas do su propia empresa, así como la propia Internet como infraestructura de 
comunicación para conseguir esa conexión. F.n un entorno como el de Internet 
no podemos asumir que todos los dientes tengan un PC , funcionando con Win¬ 
dows como sistema operativo, para poder ejecutar las interlaces de usuario ba¬ 
sadas en formularios Windows descritas en el capítulo previo. I-visión otros 
dispositivos \ otros sistemas operativos, potenciales clientes a los que hay que 
ofrecer olro tipo de inlerfa/ de acceso a nuestros ser\ icios. 

I na de las novedades más interesantes de Visual Studio .NET, realmente 
de la plataforma Microsoft NP I, es ASP.NE I , el sucesor de ASP [Aitivc Se/ver 
P/jycs). Mediante ASP.NE I podemos desarrollar aplicaciones, generalmente 
interfaces de usuario, accesibles desde cualquier cliente que sea capaz de acce¬ 
der a un servidor Web. ASP.NE I se encarga de ejecutar la lógica en el servidor 
\ generar el código I I I MI apropiado para el cliente que electue la solicitud, 
sin importar el tipo de dispositivo, hardware o sistema operativo en que esté 
ejecutándose. 

El objetivo de este capitulo es describir una parte de ASP.NE I , concretamen¬ 
te los formularios Web. Con ellos podemos crear intertaces usando prácticamen¬ 
te la misma metodología descrita en el capítulo previo, arrastrando y soltando 
controles sobre un contenedor, editando propiedades y asociando código a even¬ 
tos I n un capitulo posterior nos ocuparemos de otros elementos de ASP.NET 
pensados para la construcción de servicios Web. 








Pura poder seguir los ejemplos de este capítulo es imprescindible que tenga 
acceso a un equipo en el que este instalado IIS, el servidor web de Microsoft, 
liste se instala por defecto en las versiones Seriar de Windows NT 4.0 v Windows 
2000, pero no en las versiones Profesional, por lo que posiblemente tenga que 
acceder a la configuración del sistema y añadir este componente. 


De ASP a ASPNET 


Desde su aparición, las paginas ASP supusieron un gran cambio en el desa¬ 
rrollo de sedes Web con contenido dinámico. Un documento web actual con¬ 
tiene tanto el diseño visual o estético de la página, generalmente en HTML, 
como código de guiones o sm’pf, habitualmente en JScript o VBScript. Pste có¬ 
digo puede ser ejecutado en el cliente o bien en el servidor, según los casos. L'l 
proceso en el servidor tiene la ventaja de que el cliente sólo recibe 11 I ML sim¬ 
ple, dejando la generación dinámica como una tarea del servidor Web. 

I as paginas ASP se procesan en el servidor, habitualmente IIS (Internet In - 
formal ion Sítw). t’ste ejecuta el código y combina su resultado con el conteni¬ 
do I ITMl original del documento, generando una página dinámicamente que 
es lo que se envía al cliente. Las ventajas de ASP son muchas facilitando, por 
ejemplo, la generación dinámica de contenido a partir de información almace¬ 
nada en una base de datos sin necesidad de escribir un CC.I (Comwon Gatcwatf 
tntvrface) clásico. Basta con algo de eódigo embebido en el documento para 
conseguir un resultado rápido 

Los inconvenientes de ASP, no obstante, también tienen su peso. Ln un do¬ 
cumento ASP se combina el código HTML con contenido estático \ marcas de 
estilo con código IScript, VBScript, o incluso ambos, que generan el contenido 
no estático. Diferentes lenguajes v sintaxis entremezclados en un mismo docu¬ 
mento, algo difícil de mantener. Además, hay que tener en cuenta que el eódi 
go de los documentos ASP es interpretado cada vez que se solicita la pagina. 


Nota 

ASP está estrechamente ligado a Windows, concretamente al servidor web 
de Microsoft, el conocido IIS. En otros sistemas, como es el caso de Linux, 
han aparecido unas soluciones similares que. como PHP, tienen sus bases 
en ASP. 


Naturaleza de un documento ASP 


Una página ASP típica es un documento, con extensión ASP. en el que se 
combinan el código HTML con guiones que el servidor web debe interpretar v 
ejecutar antes de enviar la respuesta al cliente P1 siguiente fragmento correspon¬ 
de a un documento ASP real, concretamente a parte del documento por defec* 




to di' lonc ¡ir tfiibcl (http: //www. fcharte.com), una sede que el autor mantie¬ 
ne y ruya portada puede ver en la figura 111 

<18 Lanquage - *' VBScr ípt " > 

< liead > 

‘•mita ht tp-equi v»"Cotiteiit-Type M con t en t» “ r ex i. / h t ni 1 ; 
charset. ’wi ndows- \ ¿ c j /"> 

<tn le>Torre de Babel 

• > If Request . QueryString * " '* Then 
Respouse . Wr i t e ( ** ( Por t ada ) “ ) 

El se 

Responsp.WriteCC Request .QueryString h, ")“) 

End IC 

%> 

</1 11 Ie> 

■ link re 1 “si y I eslieel “ t ype “ I exl./css" href *"TorreBabe I . rss" - 
</head-> 

<body> 


( orno puede ver, al inicio del documento se indica el lenguaje en el que es 
tan codificados los guiones del documento, en este caso VBScnpt A continua 
i ion se combinan las marcas I ITMl corrientes, como <head> o <title>. con 
índigo que debe ser interpretado por el servidor, corno el condicional delimi¬ 
tado por las parejas de caraí teres <1 v %> que. en este caso concreto, introduce 
en el documento la cadena de caracteres "(Portada)” o bien el valor que 
lontenga la propiedad QuerySLring del objeto Request 

I a inclusión de código ejecutable en el mismo documento que alberga el 
contenido v diseño de la pagina da tugara lo que se conoce como t odt\ 

una mezcla de diversos lenguajes que se entremezclan a lo largo de todo el do- 
i límenlo v que no contribuyen en absoluto a su legibilidad y facilidad de man 
tenimiento 

Aunque podemos usar JavaScript en lugar de VBSi ripl, como una altérnate 
v«i ile preferencias respecto al lenguaje, no existen mui lias mas posibilidades a 
la hora de crear documentos ASP \ el proceso siempre será el mismo el doi u 
menlo se procesa en el serv idor, este toma el i odigo de los guiones, lo interpre 
la v ejecuta v lo sustituye en el documento original por el resultado que se hava 
obtenido de esa ejecución. 

Ocultación de I código en ASPNEÍ 

Uno de los cambios de ASP a ASI* NI I es lo que Mii rosoli denomina ciu/r 
¡h'luini. consistente en l«i ocultación del código ejecutable separándolo del con 
tenido estático \ diseno de la página Para ello, en la cabecera del documento 
A*sl' NI I, se indicará cuál es el lenguaje en el que esta escrito el codigo \ tai ili 
tara el lamino al «uvhivu que contiene dii bo código 
l a sintaxis seria la siguiente: 


< 'ti* Page Lanquage” " vb" Codebeh uid' "WebFor m 1 . .ispx . vb" 
Inherits’WebSimple.webFoimi"X • 































Que exisla la posibilidad do separar lógica \ diseño en dos archivos separa¬ 
dos no se conv¡orlo en una exigencia, es decir, en un documento ASP.NKI, en 
el archivo con extensión aspx, es posible seguir introduciendo el codigo si es 
que asi lo deseamos, aunque no será lo habitual salvo casos muv simples como 
algunos de los ejemplos que se propondrán a continuación. 

Libertad de elección de lenguaje 

Asumiendo que para el desarrollo de nuestros componentes v aplicaciones 
utilizásemos habilualmenle Visual Basic .NI T, por poner un ejemplo, ¿por que 
tenemos que usar obligatoriamente IScript o VBScript ti la hora de crear un do¬ 
cumento ASI’? Con ASP.NIiT esta obligación, o limitación, encuentra su fin 
Ahora podemos usar como lenguaje de senpf prácticamente cualquiera de los 
lenguajes NI I si exceptuamos Visual C++. Fslo significa que podemos utili¬ 
zar C" o Visual Basic NI T, además de IScript .NI I. para generar el contenido 
dinámico 


Nota 

En ASP.NET el lenguaje VBScript ha desaparecido y, en su lugar, utiliza¬ 
ríamos Visual Basic.NET, que es un superconjunto de VBScript. 

I as aplicaciones ASP.NF.T están constituidas por módulos, archivos con 
HTMI s código de m ripl, con extensión aspx. Cada uno de esos módulos se 
inicia, como se ha ¡ndicadoen el punto anterior, con un encabezado en el que 
se indica el lenguaje que se utilizara, liste puede ser cualquiera de los disponi¬ 
bles en Visual Studio .NI I a excepción de Visual Oh Incluso es posible uti¬ 
lizar lenguajes añadidos posteriormente al entorno, como COBOI . Pascal. Perl, 
Pvlhon o Java. 

I legir un lenguaje u otro, a la hora de escribir la lógica de un documento 
ASP.NIT es, por tanto, una cuestión de gustos, una opción personal y no una 
imposición del fabricante, lo cual supone un cambio sustancial respecto a ASI\ 
Pí IP v las soluciones que se utilizan hasta ahora. 

Adiós a los guiones interpretados 

Según se apuntaba anteriormente, el c ódigo embebido en los documentos 
ASP, en forma de guiones, es interpretado cada vez que un i líente solicita esa 
pagina l.sto compromete el rendimiento del serv idor que, .1 pesar de set bue¬ 
no, obviamente no es el mejor posible debido «1 que se emplea parle de su liem 
po en el análisis e interpretación del código, siempre como paso previo a la 
ejecución v generación linal de la pagina a remitirá dicho 1 líenle. 

Con ASIAN I I el escenario es distinto, va que el código embebido en élites es 
compilado la primera vez que es solicitada la pagina tras lo cual el correspon¬ 
diente ensamblado se almacena temporalmente en un espacio conocido como 




ituht' Do osla forma, ante nuevas solicitudes do dientes ol codito puede sor 
rjmiljdo sin necesidad do reiompilacion. 

Tara comprobar osla afirmación puodo olootuar una prueba muv sencilla 
Abra ol Bloc do notas, introduzca ol código mostrado a continuación v guárde¬ 
lo en un archivo, llamándolo HolaMundo. aspx. en la carpeta principal rio su 
servidor Web, c|ue habitualmente es inetPut \wwwrool. 

Paqe Lanquaqe* H VB" l> 

<hcml> 

< body > 

<1 Din 1 As Byte 

For l - 1 To 'y 

Response . Wr i t e ( " <h” & I.ToStrinq() i» 

" ‘Mola mundo") 

Next 

X> 

</body > 


Básicamente es un documento ASI* en el que se indica, al iuii io, el lenguaje 
que va a usarse para introducir código. I a primera voz que solicito esta pagi¬ 
na. I< 1 1 v como se ha hecho en la figura I 1.2, comprobará que la respuesta tarda 
unos segundos. So osla compilando el código obteniendo una versión ejecuta¬ 
ble. Posteriormente, cualquier solicitud obtendrá una respuesta inmediata. 



Figura 11.2. Pagina obtenida al solicitar el documento HolaMundo.aspx 

f n osle caso hemos embebido el código del guión en el propio documento 
ASr.NI I. ile tal forma que la compilación la dejamos en mano del servidor 
que la efectuará a demanda, cuando lo necesite. listarnos usando la compila 
cion dinámica de ASP.NI I I a alternativa es separar el guión en un modulo 
separado que. compilado en el momento de distribuirse, sena accesible desde 




el documento ASJ’.NET. Déosla lorma la compilación seria estática y el código 
ejecutable siempre, sin pérdida de tiempo. 

Inicie un nuevo proyecto de tipo Aplicación Web ASP.NET, como se hace en 
la figura 11.3, usando el lenguaje Visual Basic. Nb I. Al pulsar el botón Aceptar 
se creara en el directorio rai/. de IIS una carpeta para la nueva aplicación. Acto 
seguido nos encontraremos con un entorno como el de la figura I 1.4. Fs un for¬ 
mulario Web, en el cual podemos insertar componentes y establecer propieda¬ 
des, como hicimos en el capilulo previo para crear aplicaciones Windows. 



Figura 11.3. Iniciamos una aplicación Web ASP.NET 



Figura 11.4. Entorno de diseño de un formulario Web 





Pulse el boton II I MI que hay en ía parte interior del editor, para acedera) 
codito 1 11 MI «.leí documento. Aparle de algunas etiquetas informativas \ luí 
formulario, lo más interesante del documento se encuentra en su cabecera: 

Page 1 a nquaqe * " vb" 

Codebehind "WebForml . aspx. vb" 

AutoEventwireup-"faI se" 

I nherits’ - '* WobS i mp 1 e . WebForro l " V > 

I ste encabe/ado identilica el codito que hav en el documento como una pa¬ 
gina ASILNF I en la que se usa el lenguaje Visual Basic. Se comunica que la lo¬ 
giza de esa pagina se eneuenlra en el archivo WebForml .aspx. vb \, ademas, 
se indica que la pagina esla derivada de la dase PaginaSimple.WebForml 

Enlace entre el documento y el código 

1 eniendo seleccionado en el Explorador de soluciones el demonio i orrespon- 
dienle a la pagina, en este c aso WebForml. aspx. pulse el botón Ver codigo 
Vera aparecer el módulo WebForm 1 . aspx. vb. un modulo en el que se define 
una clase escrita en lenguaje Visual Basic .Ni T 1. La cabecera es l.j siguiente 

Public Class WebFOil"l 

Inherits Syslem.Web.U1.Paqe 

I a clase WebForml esla derivada de Sys t_em. Web . U1 . Page que estable 
tiendo una analogía, es como la clase System. Windows . Forms . Forra pero 
para las aplicaciones Web A su ve/, la página definida en el documento Web¬ 
Form 1 . aspx esta derivada déosla clase WebForml, de tal manera que hereda 
todos sus miembros. Si, quizá pueda parecerle extraño, pero tenemos una pa¬ 
gina ASI 1 .NI I que hereda los miembros de una clase escrita en Visual Basic 
NT I I sic> es posible. lógicamente, porque los dos módulos, WebForml .aspx 
v WebForml .aspx. vb, generan código MSII al ser compilados 

l.n el modulo V isual Basic, concretamente en la clase WebForml encontra¬ 
mos varios métodos mas, entre ellos los encargados de gestionar los eventos 
Load»* Init Introdu/.cu el c ódigo siguiente en el método Page_Load( ) 

Dim N As Byte 

For N “ 1 To 5 
Pesponse.Writef 

"<h" i> f¡ & " Mióla mundo</h" i M "'*'•) 

Next 

l.a propiedad Response es una de las que tiene esle formulario Web que. 
en definitiva, es un objeto de la clase Page. Utilizamos el método Write( ) de 
dicha propiedad para introducir contenido en el documento c uando este sea 
solicitado. 

Si ejecuta el provéelo verá que se abre el cliente Web que tenga instalado en 
el sistema y que el resultado obtenido es, básicamente, el mismo que teníamos 



con el ejemplo anterior. La diferencia esta en que. en este caso, el código no 
forma parte del documento ASr.NL'l, por lo que resulta mucho mas tacil man¬ 
tenerlo. 



Obviamente, el contenido introducido en la página desde el código Visual 
Basic .NET puede ser recuperado desde una base de datos u obtenido me¬ 
diante algún otro proceso más complejo que el usado aquí como ejemplo. 


Abra la carpeta correspondiente a este ejemplo y compruebe que, ademas 
deí documento ASP.NET, alojado en el archivo aspx, existe una subí.arpeta, 
llamada bi n, en la que encontrará un módulo en forma de biblioteca de enlace 
dinámico. I se modulo, en este caso llamado WebS imple . dll, es el que contie¬ 
ne el código va compilado que utilizará el servidor para generar el contenido 
dinámico. 


El diseñador de formularios Web 


Al igual que para las aplicaciones Windows, Visual Basic .NI I dispone de 
un diseñador especifico para el trabajo con formularios Web, diseñador que 
aparece en la figura I 14. Ln este caso el contenedor es la propia pagina Web. 
Esta aparece como un fondo blanco con una cuadrícula sobre él, aunque, a di¬ 
ferencia de los formularios Windows, no tiene una barra de Idilio, un burdo o 
botones para inaximi/ar, minimizar y cerrar, puesto que éstos no son elemen¬ 
tos propios de una pagina HTML. 

I os componentes so encuentran en el Cuadro de herramientas, concretamen¬ 
te en las páginas Web Forms \ HTML. Los primeros si- asemejan mucho a los 
controles usados en formularios Windows, hasta el punto de llamarse igual y 
tener en común la mayoría de las propiedades, métodos y eventos. El funcio¬ 
namiento del control, como puede imaginar, es nuiy distinto va que. en lugar 
de dibujarse en una ventana Windows, lo que tiene que hacer es generar el có¬ 
digo IITMI necesario para aparecer en un cliente web tipo Internet Explorer, 
Netscape Navigator. Opera, Mo/.illa o similar. 

Mas adelante, en este mismo capitulo, conocerá algunos controles para for¬ 
mularios Web, especialmente algunos específicos que no tienen un equivalente 
en los formularios Windows como son los de validación. 

la clase Page 

Si el contenedor típico en una aplicación Windows es un objeto de la clase 
System. Windows .Forms . Form o derivada, en el caso de las aplicaciones ba¬ 
sadas en formularios web dicha dase es System. Web. UI . Page, es decir, la 




clase Page alojada en el ámbito Sys tem. Web . UI, en el que también encontra¬ 
remos la mayoría de controles para usar en este tipo de proyectos. 

Al usar el diseñador con que cuenta Visual Basic .NF.T generamos automáti¬ 
camente, según hemos visto antes, una dase derivada de Page. Esta dase he¬ 
reda. por tanto, todos los métodos, propiedades y eventos definidos en dicha 
clase, muchos de los cuales son equivalentes a los que existían en ASI’, como es 
el caso de Request y Res pon se. 

Uno de los primeros pasos que daremos, justo después de crear una nueva 
pagina, será modificar la propiedad ClientTarget, para lo cual recurrire¬ 
mos, como es habitual, a la ventana Propiedades C on esa propiedad elegimos 
el cliente destinatario de la interfaz. Tal y como se aprecia en la figura 11.5 en 
principio tenemos tres posibilidades. Dependiendo de la selección efectuada 
ASP.NL I generará el contenido del documento usando unas posibilidades u 
otras. Si el destinatario es Internet Explorer 5.0 se usará DI I I MI , por poner un 
ejemplo, mientras que si hemos elegido Internet Explorer 3.02 / Navigator 3.0 
se utilizara HTML sin mas. 



Figura 11.5. Podemos seleccionar el tipo de cliente al que va destinado 
el proyecto 

En caso de que estemos desarrollando un proyecto para una empresa es 
más fácil tener un control sobre el cliente web que utilizarán los usuarios de la 
aplicación, pero en caso contrario no debemos asumir que todo el mundo dis¬ 
pone de la ultima versión de Internet Explorer y, por tanto, puede usar DHÍML 
v posibilidades similares. 

Seleccionando un cliente más antiguo se obtendrá un resultado relativamente 
más pobre, en cuanto apariencia, pero, a cambio, podremos llegar a más dien¬ 
tes sin problemas. 




distribución ¿leí contenido 


Al desarrollar aplicaciones basadas en formularios estamos acostumbrados 
a colocar los controles en posiciones absolutas, expresadas en puntos, ya que, 
hasta cierto punto, suponemos la configuración que tendrá el destinatario de 
esa aplicación 

Cuando se diseñan formularios web, por el contrario, no siempre puede ha¬ 
cerse esa suposición. De hecho, si alguna ve/ ha escrito código HTMI sabrá 
que los elementos no se colocan habitualmente en una posición absoluta, sino 
que siguen un cierto flujo. 

C liando se crea un nuevo formulario web con Visual Basic .NET automáti¬ 
camente se establece una distribución, conocida como GridLayout, que nos 
permite colocar los controles en cualquier punto de la página, exactamente 
igual que si se tratase de una ventana Windows, tiste posicionamiento absolu¬ 
to resulta cómodo pero, dependiendo del cliente, puede generar problemas de 
visual ¡/.ación. í’n este caso modificaríamos la propiedad pageLayout de la 
clase Page seleccionando la opción PageLayout. Al hacerlo vera que los con¬ 
troles se ajustan automáticamente a las dimensiones de la página v se colocan 
automáticamente donde convenga, sin una posición lija. 

Utilizando la distribución PageLayout tendrá más diticultades para com¬ 
poner la interfaz de usuario si no está acostumbrado a trabajar con HTML. 
Tendrá que usar controles adicionales para compensar la falta de una posición 
absoluta pero, a cambio, su interfaz no estará limitada a Internet Explorer. 

Eventos y gestores- 

Como puede ver, el diseño de la interfaz de usuario en un formulario Web 
no difiere demasiado respecto a los formularios Windows, v lo mismo ocurre 
con la asociación de gestores de eventos con el código que debe ejecutarse 
cuando los controles generen ciertas señales. Si inserta un botón en un formu¬ 
lario Web y hace doble clic sobre él verá que se abre el controlador correspon¬ 
diente al evento por defecto. La asociación se establece declarando la variable 
que contiene la referencia al control con WithEvents v añadiendo la cláusula 
Handles al método que va a gestionarlo. 

Encontrándonos en el editor de código, no tenemos más que desplegar las 
listas que hav en la parte superior para acceder a los controles que haya en la 
pagina y. a continuación, seleccionar el evento que deseamos controlar, exacta¬ 
mente igual que en una aplicación Windows. 

A pesar de esta similitud aparente, la gestión de los eventos en una aplica¬ 
ción ASI’.NK I difiere considerablemente de la efectuada en un programa Win¬ 
dows. En éste el sistema operativo genera señales que transfiere directamente 
a la aplicación, mientras que en el caso de una aplicación Web los eventos se 
generan en un cliente remoto, posiblemente a miles de kilómetros, y son trans¬ 
feridos hasta i*l servidor web que, en definitiva, es el que ejecuta las reglas de 
negocio, en este caso los gestores de esos eventos 



Componentes HTML 

Una de las funciones Ji l diseñador de formularios Windows es servirnos 
como editor II I MI al estilo di* l ; ron I Pago v productos similares Tara ello nos 
ofrece una serie de controles, en la pagina HTML del Cuadro de herramientas, 
asi como una barra de botones especifica (véase figura I 1.6) que tendremos que 
activar usando el menú emergente de las barras de botones Al trabajar con el 
diseñador de formularios Web también vera que aparecen opciones adic iona¬ 
les en i*l menú de Visual Basic NI I, concretamente tres nuevos inenus Tabla. 
Insertar y Marcos que facilitan el trabajo con labias v marcos I I ! MI asi como 
l.i inserción de imágenes \ secciones 
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Figura 11.6. Paleta de botones para edición de HTML 

I os componentes IITMI. que insertemos en el formulario aparecen en el di 
senador como el reflejo del código 1 I I MI que hav en la pagina, pero sin ai ti 
\ a i conexión alguna entre el cliente v el servidor. I s decir. estos componentes 
son los que utilizaríamos para establecer el contenido estático de la pagina, un 
contenido que se almacenará, sin mas, en el documento aspx \ ionio tal sera 
transferido al cliente cuando éste efectúe una solicitud 

Aunque puede arrastrar cualquier componente de la página HTML al inte 
rior de la página \. a continuación, usar la ventana Propiedades para porso 
nali/arlo, vera que las propiedades difieren sust.im ialmente de las que liemos 
conocido en el capitulo previo para controlo* equivalentes Puede verlo sim 
plómenle insertando en una página un BuLLon de la pagina Web Forms \ el 
mismo elemento de la pagina HTML Al elegirlos podra ver el conjunto de pro¬ 
piedades tan distinto con que cuentan. 

Por ultimo, los controles 11 IMI. no generan eventos que podamos controlar 
con gestores, según el esquema que va conocemos. Si pretendemos responder 
a los eventos de los controles do una página deberemos recurrir a los de la pa¬ 
gina Web Forms. también conocidos como controles de servidor, v no <i los de 
la pagina HTML 

Componentes de servidor 

A la hora crear una aplicación basada en formularios Windows nlili/amo.s 
como se vio en el capilolo pre\ ¡o, unos controles específicos para este tipo de 
apliiaciones. Son controles que saben como generar su mirria/ en el interior 
ile una ventana Windows \ romo mterai luar ion el sistema. 

C uando la interla/ de usuario no es una aplii ai ion nativa sino una pagina 
Web, corno las de cualquiei sede que pueda encontrarse en Internet, los con¬ 
troles que se utilizan son de tipo II I MI I stos se iiu Inven en un lormulario 




I N MI. y cumian con una l'uncionalidad limitada, especialmente si se les compa¬ 
ra con los controles típicos de una aplicación Windows, De ahi que a las inter¬ 
laces nativas, basadas en Formularios Windows, se las cono/cu como intertaces 
en Funcionalidad. 

En ASP.N FT se introducen los controles de servidor, un gran conjunto de 
componentes que podemos usar en cualquier documento ASP.N L I v que. en el 
momento de solicitarse las paginas por parte del cliente, generan automática¬ 
mente código II I MI . F.s decir, se sigue manteniendo la compatibilidad con los 
clientes al tiempo que se Facilita v amplia el campo de trabajo del diseñador/ 
programador. 

Al igual que los componentes para Formularios Windows que pudimos co¬ 
nocer en un capitulo previo, los controles Web de servidor disponen de pro¬ 
piedades, métodos v eventos, muchos de ellos comunes. El ámbito con nombre 
System . Web. UI .WebControls contiene todas las clases do componentes de 
servidor que podemos usaren una página ASI*.NI I. Si consulta la documenta¬ 
ción podrá ver que tenemos desde los típicos bolones, listas v cajas de selec¬ 
ción hasta cuadriculas de datos o calendarios 

U so de componentes de servidor 

Inicie un nuevo proyecto basado en formularios Web y observe la lista de 
controles existentes en la página Web Forms del Cuadro de herramientas, pá¬ 
gina que aparece abierta por defecto. Por una parte encontrara muchos de los 
controles que ya conoce de Windows: cajas de texto, botones, listas, etc. En 
realidad son controles de servidor ASP.N F1 con una funcionalidad equivalen¬ 
te a los que conoce, no son los mismos controles. Mas abajo encontrara compo¬ 
nentes específicos, como los que permiten efectuar validaciones del contenido 
de controles. 

Con el objetivo de realizar una prueba simple tome del Cuadro de herra¬ 
mientas un control Calendar v un TextBox, insertándolos en la página tal v 
como se aprecia en la Figura I 1.7 F.l aspecto inicial del calendario no es el que 
puede verse en esta Figura, para conseguir dicha apariencia se han modificado 
algunas propiedades: BackColor, para establecer el color de fondo general; 
DayHeaderStyle, configurando la cabecera donde aparecen los nombres de 
los días; SelectedDayStyle, fijando los atributos del día elegido, etc. 

Nos interesa que, cuando el cliente solicite el documento y seleccione un 
dia, el día elegido aparezca en el interior de la caja de texto Con este Fin, te¬ 
niendo seleccionado el calendario, hacemos doble clic sobre el para generar el 
método asociado al evento SelectionChanged En su interior introducimos 
la siguiente sentencia: 

TexLBoxl .Text 3 "Has elegido la fecha " i. 

Calendarl.SelectedDaLe 

Asignamos a la propiedad Text de la caja de texto un mensaje seguido del 
contenido de la propiedad SelectedDate del calendario. Dicha propiedad 
contiene la techa seleccionada en ese instante en el calendario. 




Figura 11.7. Diseño de la página con el calendario y la caja de lexto 


Nota 

Observe que la forma de trabajar con los componentes de servidor ASP.NET 
es idéntica a la que conocimos previamente para los controles Windows. 
Basta una asignación a una propiedad, por ejemplo, para cambiar el título 
o contenido de un control. Detrás de esa asignación, no obstante, el proce¬ 
so que lleva a cabo el control es muy distinto, como podrá imaginar. Para 
cambiar el título de un control Windows basta con enviarle un mensaje a 
la correspondiente ventana, mientras que en el caso de los controles de 
servidor se establece una comunicación entre un cliente y un servidor Web 
conectados a través de una red. 



Si ejecuta el provento verá que el cu ni por la miento es el esperado (véase fi¬ 
gura 1 I.S). Aparece una página I I I MI. con un calendario v una caja de texto 
Al seleccionar una lecha, ésta aparece en la caja de texto. 


Examen del código HTML en el servidor 

Sabemos que. al trabajar con un formulario Windows, cualquier modifica¬ 
ción de propiedades inserción de componentes o uso de un evenlo st* traduce 
en la generación de código que es, automáticamente. introducido en el corres 
pendiente módulo C uando trabajamos con una aplicación Web ASP.NI I te 













nomos dos módulos que van actualizándose: el módulo de código y la propia 
página ASP.NEI. 
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Figura 11.8. La aplicación Web en funcionamiento en Internet Explorer 


En el módulo de código, en este caso WebForml . aspx . vb, verá que se aña¬ 
de a la clase derivada de Page un miembro por cada control insertado en la pa¬ 
gina. En eJ método InitializeComponent ( ) se conectan los eventos de los 
controles con métodos de la clase, en este ejemplo concreto el evento Selec- 
tionChanged del calendario se conecta a un método en el cual hemos intro¬ 
ducido la asignación del punto anterior. No encontramos en este modulo, sin 
embargo, las asignaciones hechas a propiedades. 

Si nos ponemos a examinar el código III MI de la página ASP.NEI el mo¬ 
dulo WebForml . aspx, encontraremos, aparte de los encabezados que vimos 
anteriormente, un código similar al siguiente: 


<£orm id»"Forml H method^"post M runat="server"> 
<asp:Calendar id="Ca1 endar 1" 

style= " I.EFT: 72px; TOP: 57px M 
runat-"server" Width=”29lpx" 
Height^"270px" ForeColor="B1ack" 
BackColor- M fFFCOCO” 

SelectedDate=" 2001 — 10 — 14”> 
<DayHeaderStyle Font-Naraos «=•"Courier New" 
Font-Bold = **True" ForeColor= "White" 
BackColor= M IOOOOCO”> 
</DayHeaderStyle> 

<SelectedDayStyle Font-Bold^"True" 
ForeColor-"»C00000"> 





</SeiectedDayStyle> 

</asp:C«j lerida; > 

<asp:TexLBox id-'TextBox1" 

style»" LEFT: 7ipx; TOP: j47px*' 
runat-"Berver“ Width= "2 92px" Height 3 " 22px"> 
< /asp: Text.Box> 
v/ i orm> 


I I formulario ASI* NI I contieno Jos componentes: Calendar \ TextBox. 
Observe como se establecen las propiedades do cada uno Jo olios, como posi¬ 
ción, nombro, color, etc. Algunas propiedades do Calendar constan do olías 
propiedades, es lo que ocurre con DayheaderSty le v SelectedDaySty le 

[.as propiedades, que afectan al aspecto estético del resultado, están en la 
página ASP NI I , mientras que la lógica, en este caso el código del método aso- 
«. iado al método Select ionChanged, se alojan independientemente en el módu¬ 
lo de código Visual Basic .NI I . De esta lorina se simplifica el mantenimiento 
de ambos elementos: interfaz, por una parte, y lógica por otra 

Examen del código en el cliente 

Si observa el código anterior comprobará que el formulario \ los entupo 
nenies cuentan con un atribulo, runa!, que indica que el proceso debe efec 
Iliarse en el serv idor, listo significa que ese código no sera enviado al cliente 
laI cual, sino que se ejecutara en el servidor Web, generando un nuevo codigo 
que, en ultimo termino, será el que reciba Internet I xplorei o el cliente que es¬ 
temos usando. 

Puede ejecutar el provecto v, una ve/ se haya abierto la pagina, utilizar la 
opción adecuada del cliente para acceder al código obtenido Vera que no exis¬ 
ten controles ASP.NI’ I. sino controles II I MI v código |avaN< ript. Básicamen¬ 
te se ulilr/a una tabla III MI para componer el calendario, una tabla en Ja que 
cada celdilla, representando un día del mes. es un enlace a un procedimiento 
lavaSi ript que se encarga de enviar el formulario al servidor con el parametro 
apropiado, momento en el que ASP NI l ejecutara la lógica, en nuestro modu 
lo Visual Basic NI I. v devolverá la respuesta al 1 líenle. 

Modificando algunas propiedades de la página, en la ventana Propiedades, 
es posible adaptar el resultado que generan los componentes de servidor para 
conseguir un mejor < om porta miento en ciertos tipos de clientes También pode¬ 
mos soleo, tonar el lenguaje de guiones pm delei to del 1 líenle 

Componentes de validación 

I os c Mentes vveb que se usan actualmente. 1 orno los va < ilados Internet I v- 
plorer v Netscape Navigator, se ejecutan sobre sistemas que tienen una cierta 
c.vpac idad de proceso listo .signil ica que ale,unas de las tareas que con ASP.N I I 
efectuamos en el servidor podrían, asimismo, ser efectuadas en el servidor. I a 
virtud estara en encontrar el termino medio entre el reparto de lateas, 1 líenle 
versus servidor, v el mejor aprovechamiento del ancho de banda 



Cuando se utilizan formularios web para solicitar datos al usuario hay una 
tarea indispensable: la validación de los datos I sta podría efectuarse en el ser¬ 
vidor que, al recibir los datos, los comprobaría y notificaría al cliente cualquier 
error I I problema en este planteamiento es que cada corrección del usuario de 
be viaiar hasta el servidor, v cada nol il icacion de éste volver de nuevo al clien¬ 
te. Si los errores son varios el proceso puede ser lento si no se utiliza una red 
propia o lo suficientemente rápida. 

La alternativa, está claro, es que ese proceso de validación se efei tue com¬ 
pletamente en el propio cliente, de tal manera que el formulario solo se envíe al 
serv idor cuando toda la información que contiene sea correcta Para ello basta 
na con escribir algo de código embebido en el propio documento ASILNLT. có¬ 
digo que se ejecutaría tío en el servidor sino en el i líente 

Utilizando ASI’ NI I la ventaja está en que no tendremos que ser nosotros 
los que escribamos el código de validación, va que existe un conjunto de com¬ 
ponentes de servidor que se encargan de generarlo automáticamente, Istos 
componentes, no visibles, se asocian con los controles de entrada de datos. Bá¬ 
sicamente hav disponibles cuatro tipos de validaciones distintas, para la cual 
existen los siguientes cuatro controles: 

• RequiredFieldValidator Se utiliza para asegurar que un campo 
obligatorio no queda en blanco al enviar el formulario. 

• RangeValidator - Permite controlar que una entrada se encuentre en¬ 
tre un cierto rango de valores 

• CompareVa i i da tor Similar al anterior, en este caso podemos utilizar 
un operador relaciona! para verificar que el valor es menor, mavor, igual 
o distinto a una cierta propiedad u otro valor. 

• ReqularExpress ionVa 1 i da tor Lo podemos utilizar para conseguir 
que la entrada de un dato se ajuste a una cierta plantilla o expresión, por 
ejemplo para la entrada de códigos postales o telefonos. 

A estas cuatro posibilidades hav que añadir una quinta, asociada al compo¬ 
nente CustomVal i da tor, que es la mas flexible de todas va que nos permite 
asociar un método a la comprobación de datos. 

Veamos un sencillo ejemplo de uso de estos componentes, concretamente 
de RequiredF i eldVa 1 idator. Iniciamos una nueva aplicación Web e introdu¬ 
cimos en la página una etiqueta, una caja de texto, un botón v hacemos doble 
clic sobre éste introduciendo el código mostrado a continuación: 

TextBoxl . féxl "Hola " ( Text Box 1 . Text 

Nada especialmente sorprendente, tan sólo utilizamos la caja de texto para 
mostrar un saludo seguido del nombre que se haca introducido. 

Añadimos a la página un componente Requ i redF ieldVa l idator que, en 
principio, aparecerá como un mensaje 1 en color rojo. Modificamos su propie¬ 
dad ErrorMessaqe, estableciendo un mensaje explicativo de cual es el proble¬ 
ma. v también la propiedad ControlToVa 1 i date facilitando la lelerencia al 



control cuyo contenido tiene que validarse, en este caso la caja de texto. F.n la 
figura 11.9 se puede observar la página, durante la tase de diseño, con el Re- 
quiredFieldValidator seleccionado y sus propiedades en la parte interior 
derecha. 



Figura 11.9. Página con el componente de validación asociado a la caja 
de texto 


Al ejecutar el proyecto vera aparecer la página con la caja de texto y el bo¬ 
tón. Si introduce un dato y pulsa el botón todo funcionará como es de esperar, 
pero si pulsa el botón dejando la caja de texto vacia aparecerá el mensaje de 
error. La comprobación di' que la caja de texto está vacía se efectúa en el clien¬ 
te. sin necesidad de enviar el formulario al servidor, gracias a un guión en Java¬ 
Script que puede encontrar en el código luente recibido por el cliente 


Solicitudes y respuestas 

Una aplicación web basada en formularios ASP.NFT. como los descritos en 
este capitulo, es ejecutada por el servidor web al recibir una solicitud de un 
cliente. Cada formulario web creado se representa mediante un objeto de la 
clase Page, tal y como se indicó antes, clase en la que encontramos propieda¬ 
des con información sobre esa solicitud y que habilitan el envío de la respues¬ 
ta hn el primer ejemplo del capitulo, por ejemplo, utilizamos la propiedad 
Response, que hemos heredado de Page al estar nuestro formulario derivado 






de dicha clase, para enviar una respuesta y la propiedad Request para recupe¬ 
rar datos de la solicitud. 

l a propiedad Request de la clase Page mantiene una referencia a un obje¬ 
to de la clase HttpRequest. Lsta dispone de un importante número de miem¬ 
bros que, en su mayor parte, podemos utilizar para recuperar información 
relativa a la propia solicitud, el cliente que la ha hecho o su configuración de 
sott wa re. 

De manera análoga, la propiedad Response contiene una referencia a un 
objeto de la clase H ttpResponse. Podemos usar sus miembros para enviar 
una respuesta al cliente y controlar diversos aspectos del contenido, como el 
plazo de expiración o las t ookic s asociadas. 


Identificación del cliente 

Ln ocasiones, con el fin di* personalizar la respuesta enviada al cliente, pue¬ 
de interesarnos identificarlo, hasta cierto punto, usando para ello la informa¬ 
ción que su i liento nos facilita en la solicitud, toda esa información se almacena 
en el servidor en una serie de variables de entorno. Algunos de los datos pode¬ 
mos recuperarlos directamente de propiedades dol objeto HttpRequest. mien¬ 
tras que otros precisarán la lectura directa di* las mencionadas variables. 

Algunas propiedades de HttpRequest mantienen directamente una cade¬ 
na de caracteres con un dato concreto. F.sel cuso de User Agent. UserHostName 
o UserHostAddress que contienen la cadena de identificación del diente, el 
nombre del ordenador del cliente v su dirección IP. Otras, como es el caso de 
Browser, lo que tienen es una referencia a un objeto, en dicho caso de tipo 
HttpBrowserCapabi 1 it íes, que, a su \ ez, disponen de multitud de propie¬ 
dades informativas. Mediante la propiedad Browser podemos recuperar da¬ 
los como el nombre del cliente, su versión, la descripción del sistema en el que 
se ejecuta, si acepta o no marcos, tablas o el uso de los lenguajes JavaScript o 
VBScripl. Son dalos lodos ellos que pueden ayudarnos a ajustar el código en¬ 
viado al cliente, aunque ésta es una tarea de la que, usando formularios Web, 
se ocupa el propio motor de AbP.NKT 

La propiedad ServerVariables de HttpRequest es una colección de 
elementos compuestos de una clave y un valor. Este tipo de colecciones se ges¬ 
tionan con la clase NameValueCol lect ion. I.a clave de cada elemento es el 
nombre de una variable de servidor, por ejemplo HTTP ACCEPT, REMOTEHOST 
o SERVER NAME. Podemos usar la propiedad ServerVariables como si de 
un arreglo se tratase, usando el nombre de la variable como indice a fin de re¬ 
cuperar el valor asociado. 

No tiene mucho sentido enumerar aquí las propiedades de HttpRequest, 
HttpBrowserCapabi 1 ities y las variables de servidor existentes, ya que es 
una información que puede encontrar rápidamente en la ayuda electrónica de 
Visual Basic .NET. Lo importante es que sepamos que esos datos existen y que 
podemos aprovecharlos en caso necesario. Si quiere realizar una prueba de los 
pasos siguientes: inicie un nuevo provecto de aplicación Web AbP.NL I, haga 
doble clic sobre el fondo de la pagina e inserte el código siguiente. 



Private Sub Paqe Load i ByVal sender As Sys t ein . Ob ject , 

ByVal e As Systen.EventArgs) Handles MyBase.Load 

With Roquest.Browser 
Response.Wri Le { 

"El cliente web es: i. .Type & " - " c .Versión _ 

>. "<;/b><br>" & 

"El sistema operativo es: <b>" & .Platform i- "</b><br>" 
"El cliente contempla el uso de marcos: <b>" f» .Frames 
i "</b><br> M k 

"El cliente acepta <i>cook.i es</i>: <b>" i, .Cookies 
i, 'X/bxp>") 

End With 


Dim Clave As String 
Response .Write ( "<pre >") 

For Each Clave In Peques t .ServerVariables 
Response . Write ( Clave t> ”**• & 

Reques t . Ser vei Var i ab 1 es {C1 ave ) b, "<br>") 

Next 
End Sub 


Como puede ver, usamos algunas de las propiedades de la clase Http- 
BrowserCapabili ties para identificar al cliente, mostrando su nombre \ la 
plataforma, asi como la indicación de si contempla el liso de marcos v tablas 
Después recorremos la colección de variables de servidor mostrando todas las 
claves v sus valores asociados. 

I I resultado es el que puede verse en la figura I 1.10, no útil por si pero muy 
informativo. 


Nota 

En lugar de utilizar los datos de la solicitud para simplemente devolverla 
al cliente, como hemos hecho en este ejemplo, podríamos almacenar parte 
de la información en una base de datos del servidor para, por ejemplo, te¬ 
ner una estadística de los clientes y plataformas de los usuarios que acce¬ 
den a nuestra aplicación lo cual, en definitiva, nos permitirá ajustar mejor 
el servicio. 


Parámetros de la solicitud 

Al env mi la solicitud al servidor, ademas del camino v el nombre del formu¬ 
lario, el archivo aspx, «'I cliente puede añadir parámetros adicionales. I n rea¬ 
lidad estos suelen añadirse automáticamente ante determinadas acciones del 
l liento, como la selección de un enlace o el envío de un formulario de datos. I o 
que nos interesa a nosotros es saber como podemos recuperar esos parámetros 
desde el >er\ iilor. 
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Figura 11.10. Alguna información sobre el cliente que ha enviado la solicitud 


Suponga que tiene un formulario inicial con varios enlaces, como el mostra¬ 
do en la figura lili. I temos insertado dos componentes HyperLink. asignan¬ 
do a la propiedad Navigatellrl los valores WebForml. aspx?Compras y 
WebForml. aspx?Catalogo, respectivamente. 1.1 carácter ? separa el nombre 
del documento a solicitar de la lista de parámetros, en este caso tan sólo uno Si 
existiesen varios los separaríamos en Iré si con el carácter &. 

Si ejecutamos el provecto tal como eslá ahora vera aparecer la pagina con 
los dos enlaces pero, al pulsar sobre ellos, simplemente se reí ibira de nuevo el 
mismo documento. Los parámetros están viajando hasta el servidor, pero éste 
no los esta utilizando. 
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Figura 11 . 11 . Formulario con los dos hiperenlaces 


Para recuperar la lista de parámetros adjuntos a una solicitud se usa la pro¬ 
piedad QueryString de la clase HttpRequest. I sa propiedad contiene una 
referencia a un objelo NameValueCollect ion, como ServerVariables 
Mediante la propiedad Count de la colección podemos saber cuántos parámetros 
se han facilitado, utilizando dicha información para acceder ti ellos mediante 
un índice numérico. 

I lacemos doble clic sobre el fondo de la página, a fin de acceder al método 
que actúa como gestor del evento Load, e introducimos el código siguiente. 
Como puede ver es muy simple: comprobamos si hay al menos un parámetro 
v. a continuación, lo devolvemos al cliente: 

If Request.QueryString,CounL <> 0 Then 
Response.WritetRequesL.QueryString(0)) 

End I i 

Ahora a! solicitar el documento obtendrá, como antes, el formulario con los 
dos enlaces Al pulsar sobre cualquiera de olios, sin embargo, vera la respues¬ 
ta. Incluso puede editar directamente el UR1 para introducir cualquier parame¬ 
tro no preestablecido, t n la practica no devolveríamos el parámetro al cliente 
sino que lo usaríamos para elaborar la respuesta adecuada 

Parámetros de formularios 


Al insertar controles en un formulario Web, indistintamente de que sean 
controles de servidor o c ontroles 1 11 MI el diseñador genera automáticamente 






un formulario IÍTMI usando la etiqueta <f orm>. Este tipo de formularios ge¬ 
neralmente cuentan con un botón que se encarga de transferir 1.a información al 
servidor, para lo cual puede utilizar dos métodos distintos: POST y GET. Fl se¬ 
gundóos el que hemos utilizado en el punto anterior para enviar los parámetros 
al servidor. 
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Figura 11.12. La aplicación responde devolviendo el parámetro entregado 
en el URL 

Para enviar el contenido de un formulario por defecto se utiliza el primer 
método, POST, consistente en incluir los datos en el cuerpo del mensaje HTTP, 
en lugar de hacerlo en el propio LIRL. De esta manera se oculta de los ojos del 
usuario y la comunicación no resulta tan obvia. Si accede al código I ITMI. de 
un formulario Web verá que la etiqueta con la que se abre el formulario os la si¬ 
guiente: 

<form id="Forml" met hod= " pos t *' runat= " ser ver " > 

La diferencia, sin embargo, no es solo estética. Los datos de un formulario 
enviado con el método GET pueden recuperarse mediante la propiedad Query- 
String que va conocemos. Por el contrario, si se utiliza el método POST dicha 
propiedad no tendrá contenido, tendremos que usar en su lugar la propiedad 
Form. También se trata de una colección, podiendo utilizarse como índice el 
nombre del control cuyo valor deseamos recuperar. 

Suponiendo que hemos insertado en un formulario una caja de texto, un 
control CheckBox, un botón v una segunda caja de texto en la parte inferior, 
tal v como puede verse en la figura l I. H, haríamos doble clic sobre el botón v 
usaríamos el código siguiente para comprobar el funcionamiento de la colee 
ción Form. 



Prívate Sub Buttcml_Click(ByVal sender As System.Object, 

ByVal e As System.EventArgs) Handles Buttonl.C1ick 
TextBox2.Text * "Hola " & Request.Form{"TextBoxl") & 

If Request.Form("CheckBoxl") » "on" Then 

TextBox2 - Text &=* "me alegro de que Lenqas una vivienda propia" 

Else 

Text-Box2 .Text &=* "siento que no tengas vivienda propia" 

End I f 
End Sub 

Recuperamos el valor introducido en la primera raja de lexto y lo mostra¬ 
mos en la segunda, añadiendo un texto que dependerá de que se haya o no ac¬ 
tivado el control CheckBox. I sle tomará el valor "on" .si se ha marcado. 



Figura 11.13. Aspecto del formulario tras introducir datos y pulsar e! boton 


Nota 

Si modifica el método usado para enviar la información, cambiando post 
porGET, y ejecuta de nuevo la aplicación verá que los datos se transmiten 
a través del URL. En cualquier caso, y asumiendo que estamos utilizando 
controles de servidor, siempre será mas fácil usar directamente Text¬ 
Boxl . Text que Request. Form( "TextBoxl " ) para recuperar el texto 




introducido en una caja de texto. La clase Forro, por el contrario, la necesi¬ 
taríamos si los controles utilizados son de tipo HTML, sin conexión con el 
servidor 


U 50 de cookies 

Si* tonoa 1 romo cookic* a pequeñas porciones de información que el servi¬ 
dor almacena en los clientes, generalmente para poder identificarlos v, en cier¬ 
ta forma, personalizar la interfaz para hacerla más amigable. I I cliente es libre 
de aceptar o denegar la operación de escritura en su sistema, al igual que el 
servidor lo es de requerir al cliente esa posibilidad si desea aprovechar ciertas 
opciones de la aplicación sede. 

Las clases HttpRequest v HttpResponse disponen di* una propiedad, 
llamada Cookies, que contiene una colección de objetos HttpCookie. Fn el 
caso de HttpRequest se trata de las cvokic s recuperadas del cliente en el mo¬ 
mento en que este hacia la solicitud, mientras que HttpResponse alojará las 
que deseemos escribir ai enviar la respuesta. Cada objeto HttpCookie cuenta 
con una serie de propiedades que permiten recuperar, o establecer, el valora al¬ 
macenaren el cliente, la techa de caducidad o el camino virtual asociado al va¬ 
lor. I ambien se puede almacenar múltiples valores asociados a una misma clave. 

Por regla general se asocia un nombre a cada eookic, nombre que se usa co¬ 
mo índice para recuperarlo o escribirlo en la colección representada por la men¬ 
cionada propiedad Cookies. I I codigo siguiente, asociado al evento Load de 
un formulario ASP.NHI. identifica a cada usuario individual que acceda a la 
pagina indicándole si es la primera vez que la solicita o bien mostrándole la fe¬ 
cha y hora de su ultimo acceso. 

Private Sub Page_Load[ByVal sender As System.Object, 

ByVal e As System.EventArqs» Handles MyBase.Load 

If Request.Cookies("U1timaVisita M ) Is Nothing Then 

Respon se . Wr i t.e { *’ Es la primera vez que visitas esta web") 

Else 

Response.Write{ “Tu ultima visita í ue el '* l 

Request.Cookies{"UltimaVisita").valué ) 

End If 

Response.Cookíes("Ui timaVisiLaVal ue =- Date.Now 

Response.Cookies("UltimaVisita").Expires 3 Dato.Now.AddYears(1) 

End Sub 

I n lugar de la lecha de la ultima visita, o además de este dato, nuestra apli¬ 
cación podría solicitar al usuario, la primera ve/ que accediese, una serie de 
datos para personalizar la información que quien* ver en posteriores accesos. 

I s la técnica usada por algunos portales para permitir a los clientes configurar 
lo según sus propias preferencias. 




Figura 11.14. Información mostrada al acceder una segunda vez 
a la página 

Módulos de configuración 

La configuración de las aplicaciones ASP.NET se efectúa mediante archivos 
con sintaxis XML, de tal forma que existen diferentes ramas y niveles jerárqui¬ 
cos con valores. Dichos archivos de configuración se llaman web.config v 
pueden alojarse en distintos puntos. 

Existe una secuencia de búsqueda para que ASP.NFT localice los archivos 
de configuración, estableciéndose un cierto mecanismo de herencia de tal for¬ 
ma que una aplicación hereda toda la configuración genérica de ASI' Nt I, la 
configuración personalizada de la aplicación e incluso una configuración local 
por carpetas. 

F.l archivo de ron figuración general de ASP.NET puede encontrarlo en el in¬ 
terior de la carpeta \WINDOWS\Microsof t. NET\Framework de su sistema, 
en una subcarpeta cuyo nombre depende de la versión de la plataforma Nh I. 
Fn mi caso concreto esa subcarpeta es vi. 0.2914, y en ella esta el archivo 
machine . conf ig, conteniendo información general de configuración. Este 
contiene las secciones necesarias para poder configurar la compilación de los 
documentos ASP.NF. I. delectar las posibilidades del cliente que está solicitán¬ 
donos la información, gestionar diferentes protocolos de comunicación, recu¬ 
perar distintas unidades de código, ele. 

No es aconsejable manipular el contenido de este archivo v, realmente, lam- 
poco es necesario. 

Podemos crear nuestros propios archivos web.config, que copiaríamos 
en la carpeta raíz de nuestra aplicación o, incluso, en las subcarpetas especifi¬ 
cas para cada componente de esa aplicación. 




Edición de I archivo web. conf ig 


Cada vez que creamos una aplicación Web, el asistente añade al provecto 
un archivo web. conf ig con una configuración por defecto. Para modificar su 
contenido hasta con hacer doble clic sobre el en el Explorador de proyectos. I I 
formato general de este archivo es el siguiente: 


<confignration> 

<secc íon> 

<valor> 

</valor> 

</seccion> 

</configuration> 

Las secciones pueden ser cualquiera de las predefinidas en el archivo de 
configuración global u otras que nosotros mismos definamos. Dependiendo de 
la sección, los valores posibles serán unos u otros. 

Supongamos que hemos desactivado la apertura automática de unidades 
con código por parte de ASP.NET, para lo cual eliminaríamos la línea <add 
assembly = "*"/> del archivo de configuración general indicado antes. Listo 
causaría que las bibliotecas copiadas en la subcarpela bin de nuestra aplica 
cion no se abriesen automáticamente, de tal manera que algunas aplicaciones 
podrían no funcionar adecuadamente. 

La solución, para establecer una configuración personalizada, seria crear un 
archivo web. conf ig con el contenido siguiente, guardando el archivo en la 
carpeta raíz de nuestra aplicación. 

<eon£iguration> 

<compilation> 

<assemblies> 

<add assembiy*“MisClases"/> 

</assemblies> 

</oompi 3 at_ ion> 

</configuration> 

Con esto conseguimos que sólo se alojen en memoria las unidades de códi¬ 
go que nosotros indiquemos explícitamente, en lugar de todas las que existan 
en la carpeta bin. 


Almacenamiento de datos de aplicación 

Como se ha indicado antes, existen una serie de secciones predefinidas para 
los archivos de configuración web. conf i g Dichas secciones están definidas 
en el archivo de configuración general Una de esas secciones, llamada app- 
Settings, puede ser usada para almacenar datos de configuración propios de 
la aplicación, en forma de parejas compuestas de una clave y un valor. 

Partamos, una vez más, de un supuesto práctico. Imagine que su aplicación 
va a estar disponible en varios idiomas, existiendo caminos diferentes para los 



documentos de cada uno de ellos. Si introdujésemos directamente esos cami¬ 
nos en los documentos estaríamos limitando las capacidades de ampliación v 
mantenimiento. Seria mucho más efectivo almacenaren el archivo de configu¬ 
ración los elementos necesarios que conniviesen los idiomas \ las carpetas aso¬ 
ciadas. 

Para añadir datos de aplicación debemos crear el aparlado<appSet tings> 
que, por detecto, no existe en el archivo de contigo ración original. Creada la 
sección, añadiríamos las claves y sus valores mediante etiquetas <add>. \i\ si¬ 
guiente fragmento, por ejemplo, añade dos claves v dos valores. Añadir un nue¬ 
vo idioma seria tan fácil como añadir una nueva linea en la sección idiomas 

<appSet 1 1 n g s > 

<add key-"Español" vaiue="contenL\es" /> 

<add key*“ Engl ish " va iue-=" cent en t \en " /> 

</appSettinqs> 

De forma análoga podríamos añadir, por ejemplo, valores para contener las 
cadenas de conexión a bases de datos, URLs de lugares externos, etc. b’l siste¬ 
ma sería prácticamente idéntico al anterior. 

Recuperando información de configuración 

Preparar un archivo de configuración como el anterior no nos serviría de 
nada si, posteriormente, no contásemos con algún sistema que nos permita re- 
cu pera ría desde nuestro documento ASP.NF I lógicamente dicho mecanismo 
existe, consistiendo, básicamente, en usar los métodos de un componente para 
recuperar la sección de configuración que nos interese. 

I I objeto que nos interesa se llama Context v esta disponible para cual¬ 
quier aplicación ASP.NP.I Dicho objeto cuenta con un método, llamado Get- 
Config( ), con el cual podemos recuperar una sección completa del archivo 
web.config, I I nombre de dicha sección la facilitaríamos como único paráme¬ 
tro al método GetConfiq( ). 

I o que obtenemos como valor de retorno es un objeto genérico, clase Ob ject. 
que deberemos convertir para poder utilizarlo. Con\ irtiendolo a un objeto de 
la clase NameValueCol lection dispondremos de una tabla a cuvos elemen¬ 
tos, que serian los introducidos en la sección, accederíamos con el típico opera¬ 
dor (). Lógicamente, el índice sería el nombre clave del valor en lugar de un 
numero. 

Una vez que hemos recuperado el valor asociado a la clave, podríamos uti¬ 
lizarlo según nos interese, ya sea para acceder a tina base de datos, establecer 
el camino base para los documentos en un cierto idioma, etc 

Asumiendo que hemos creado el archivo de configuración citado en el pun¬ 
to previo, veamos en la práctica cómo podríamos permitir al cliente seleccionar 
un idioma, obteniendo el camino donde se encuentran los documentos corres¬ 
pondientes Nosotros nos limitaremos a mostrar ese camino, aunque podría¬ 
mos usarlo, como se ha dicho, para lijar la carpeta de acceso a los dotlímenlos 
hl siguiente sería parte del contenido del modulo aspx de la aplicación: 



<scrlpt Language="vb" runat="server"> 

Public Sub CarabioIdioma( 

ByVal O As Object, ByVal e As EventArgs) 

Dim Colección As NameValueColLection » 

Context.GetConfiq("appSet rings") 

Dim Valor As String » _ 

Colección(Idioma.SelectedILem.Value) 

Response,Wri Le(Valor) 

End Sub 

</scripl> 

«■body MSP0S1 T T ON I NC~"Gr idl.ayout" > 

<£orm id="Forml" method*"post. *' runat.-"server H > 

<asp:dropdown1ist id="Idioma” runat="server“> 
<asp:1 l stitem>Español</asp:listitem> 

<asp: 1 i s t i ten»>Engl ish</asp:list.item> 

</asp:dropdown1 ist> 

<asp:button runat-"server" Texl="Consultar . .." 
OiiCllck—“CajnbioIdioma" ID*"Butlon 1'' /> 

< / f ortn> 

</bodv> 


I lemos incluido en el formulario II I MI un componente dropdownlist, es 
decir, una lisia desplegadle con los idiomas que tenemos como opción. Tam¬ 
bién se ha insertado un botón asociando el evento que se produce al pulsarlo 
con el método que hav al principio. I n el usamos la propiedad SelectedI tem 
del control para recuperar una referencia al elemento seleccionado que, a su 
ve/, cuenta con una propiedad llamada Valué conteniendo el valor. I n este 
caso la lógica se ha embebido en el propio documento ASI 1 .NI-. I en forma de 
guión, pero podríamos haberla introducido separadamente como hemos hecho 
en ejemplos previos 

Al solicitar este documento vena, en principio, la lista desplegable con los 
idiomas \ t*I bolon. Seleccione una de las opciones v después pulse el hoton. 
V era entonces aparecer, como muestra la tigura I 1.13, el camino indicado en el 
archivo web.config. I ogicamente, cualquier cambio en dicho archivo loh- 
d na una repercusión inmediata en el funcionamiento del documento A SIMM I : I, 
el cual mostraría el nuevo valor en cuanto otro r. líente \ olviese a solicitar dicha 
página. 


Puntos clave 

• ASI*.NI I supone una mejora importante res pecio a ASI*, su predecesor, 
al dar libertad en la elección del lenguaje para escribir los guiones, com 
pilar estos en lugar de interpretarlos v hacer posible la separación entre 
código ejecutable v código 111 MI 

• Visual Basic NI* I dispone de un diseñador que lar ilila la crear ion de lor 
miliarios Web usando los mismos recursos que conocimos en el capitulo 
pre\ io para los humíllanos Windows. 




Figura 11.15. Al elegir un idioma el documento nos muestra el camino 
indicado en el archivo de configuración 

• I I contenedor de primer nivel, el formulario Web. es la representación do 
un objeto de la dase Page. I sla dispone de propiedades que permiten 
adaptar la generación del contenido para distintos clientes. 

• Un formulario web esta compuesto de dos módulos. I I primero, con ex¬ 
tensión aspx. aloja el codigo t 11 MI . mientras que el segundo, con exten 
sión aspx.vb. contiene el codigo Visual Basic ATI con la lógica. 

• Los componentes 1 I I MI sólo aparecen en el módulo aspx, enviándose al 
cliente como contenido estático. 

• t os componentes de servidor aparecen en ambos módulos, establecién¬ 
dose un enlace que facilita la gestión en el servidor de los exentos que se 
produ/i.m en el cliente 

• (.¡radas a los componentes espedimos para validación no es necesario 
transferir los datos del cliente al servidor para cada comprobación, olee 
toándose esta en el cliente 

• Desde un lormulario Web podemos acceder a toda la información de la 
solu ilud enviada por el <. liento gracias a la propiedad Request, recupe¬ 
rando líalos sobre el diente, parámetros asociados a la solicitud o inlor 
marión introducida en un lormulario 

• Medíanle la propiedad Cookies resulta tacil almacenar \ recuperar in¬ 
formación en el equipo di* los clientes, a fin de ídemil u ai los \ personali¬ 
zar la respuesta 

• I .i configuración de un lormulario Web puede sci dinamita mediante el 
uso de archivos de conligurar ion web . coníig. 




Resumen 


Aunque con diferencias lógicas por la naturaleza del tipo de aplicación, lo 
cierto es que las similitudes en Iré los lormularios Windows v Web son nota 
bles como Iremos podido ver en este capitulo I sto hace mucho mas lacil el di¬ 
seño de interfaces nativas, ricas en luncionalidad. para aquellos clientes que 
pueden usar la aplicación en un PC con Windows, asi como interfaces ligeras 
para el resto de usuarios, indistintamente del dispositivo y la plataforma hard¬ 
ware que utilice. 

Los servicios de ASP.NFT darían para escribir un libro completo, de hecho 
existen títulos monográficos sobre el tema. Ln este capitulo nos hemos ocupa¬ 
do de una pequeña porción: los formularios Web. Posteriormente veremos có¬ 
mo usar ASP.NHT para crear servicios Web, ocupándonos también, aunque de 
manera breve, del desarrollo de componentes para este tipo de aplicaciones. 






12 

Servicios 
á& entrada 
y salida 


Las aplicaciones no sólo cuentan con interfaces de usuario, como las abor¬ 
dadas en los dos capítulos precedentes, sino que deben procesar una informa¬ 
ción que, por regla general, es preciso almacenar de numera no volátil en algún 
dispositivo, habitual mente un disco magnético que puede encontrarse en el pro¬ 
pio equipo del cliente o bien en el servidor al que esta accediendo. 

Para almacenar la información, y recuperarla cuando convenga, lo mas 
usual es conectar con un sistema RDBMS o gestor de bases de datos enviándole 
Lis sentencias necesarias junto con los datos. Con este fin, como veremos en un 
capitulo posterior, podemos utilizar los servicios conocidos genéricos como 
ADO.NET. La alternativa, si no deseamos utilizar una base de datos, consiste 
en crear nosotros mismos un archivo que contenga la información. 

En este capitulo conoceremos varias clases mediante las cuales podremos, 
en general, acceder al sistema de archivos del entorno, obteniendo información 
sobre las unidades lógicas existentes, sus carpetas v archivos y manipulando 
todos esos elementos. También aprenderemos a escribir y leer texto y datos bi¬ 
narios en esos archivos. Toda la metodología puede utilizarse indistintamente 
desde una aplicación de consola, una interfaz Windows o un componente que 
se ejecuta en un servidor. En los ejemplos de este capitulo, por simplicidad, 
recurriremos principalmente al uso de la consola cómo medio de entrada y sa¬ 
lida visual. 









Primera aproximación 


Todos las < lases de objeto, estructuras y demás elementos que necesitamos 
para acceder al sistema de archivos del ordenador se encuentran definidas en 
el ámbito System. 10 que, por tanto, deberemos importaren cualquier provec¬ 
to donde necesitemos estos servicios. 

l a treintena de clases existentes pueden agruparse en tres categorías: las 
que facilitan información y permiten manipular las carpetas y archivos como 
unidad básica, aquellas que facilitan la entrada v salida de datos en los archi¬ 
vos v las que representan las distintas excepciones que pueden producirse. Al 
primer grupo pertenecen clases como File v Directory que, como puede 
imaginar, representan a un archivo y una carpeta, l a mayoría de las clases del 
segundo grupo tienen un nombre que termina con el sufijo Reader uWriter, 
según se utilice para leer o escribir datos. 

Algunos ejemplos son Binar y Reader, TextWri ter o StringWri ter. I’or 
ultimo tenemos las clases de excepciones que, como es habitual, usan el sufijo 
Exception en sus nombres. 

Como es habitual en otros servicios que va hemos conocido, algunas de las 
clases de System. 10 disponen de métodos compartidos que pueden utilizar¬ 
se sin necesidad de crear objeto alguno. F.stas clases, además, suelen ser Not- 
Inheritable, es decir, se trata de clases de uso final que no pueden utilizarse 
como base para derivar otras. 

E! paradigma de loe flujos de datoe 

BASIC nunca ha sido un lenguaje que se haya caracterizado por sus posibili¬ 
dades a la hora de trabajar con archivos en disco. La orden Open "Archivo" 
For Modo As #, conjuntamente con Put v Get o Print e Input, han estado 
utilizándose durante años y aun hoy muchos usuarios de Visual Basic siguen 
introduciéndolas en su código, l o mismo ocurre con estructuras relativamente 
arcaicas, como las utilizadas para buscar archivos en carpetas o manipular esas 
carpetas. No es de extrañar, ya que hasta la aparición del objeto FileSystem- 
Qbject, en Visual Basic ñ. no existían muchas alternativas. 

Los servicios de entrada y salida de información de la plataforma NI i re¬ 
presentados por las clases del ámbito System. 10, se basan en el paradigma 
del flujo o corriente de datos. Mediante métodos podemos recuperar informa 
cion de ese flujo o bien introducirla en el, sin importar el medio del que este 
mos levendo o donde estemos escribiendo 

F.ste paradigma, el de! s trnuit o flujo genérico, permite tratar por igual un 
archivo en disco, un bloque de* memoria o la transferencia entre dos sistemas 
través de una red El tipo de flujo determina el medio, pero su uso no difiere de 
cara al programador de cualquier otro tipo de flujo. 

I as posibilidades de Visual Basic .NLTen este sentido, por tanto, también 
se han mejorado considerablemente, en cuanto a flexibilidad y facilidad, respe*, 
to a versiones previas. 



Preparados para otras plataformas 

Los sistemas do archivos tienen una estructura muy diferente dependiendo 
de la plataforma en la que trabajemos. Como usuarios de Visual Basic estamos 
acostumbrados a usar el sistema de archivos de Windows, en el que se utilizan 
letras para designar a unidades lógicas, el carácter : para separar el nombre de 
esas unidades de los caminos v el carácter \ para separar las distintas carpetas 
que componen un camino, Esos elementos son distintos en I inux o Mac OS, 
por poner un ejemplo. Es el caso del carácter separador de carpetas en los ca¬ 
minos. Otros elementos directamente no existen, como las letras de unidades 
que no tienen un equivalente en Linux o Unix. 

Aunque en principio la plataforma Microsoft .NFT ha aparecido para Win¬ 
dows, no es descartable que en un futuro también esté disponible para otros 
sistemas operativos. Por eso ciertos aspectos, como es el caso de las clases del 
ámbito System. 10, están desde un principio preparados para esa posible 

tiradas a la clase Path, por ejemplo, es posible manipular un camino, com¬ 
puesto de* una secuencia de carpetas, un nombre de archivo y, posiblemente, 
una letra ele* unidad, con independencia de la plataforma, evitando problemas 
causados por los distintos separadores que se usan en cada plataforma 

Recuperando información de I sistema de archivos 


Comencemos nuestro recorrido por algunos de los servicios existentes en 
System. 10 viendo cómo podemos recuperar información relativa al sistema 
de archivos sobre el que vamos a trabajar. Gran parte del trabajo puede efec¬ 
tuarse usando métodos compartidos di* clases como Directory v File Se 
caracterizan por ser ciases de uso final y con todos los métodos compartidos, 
por lo que no tiene sentido crear objetos a partir de ellas, también cuentan con 
métodos que lacihtan la manipulación de ciertos elementos, como las carpetas, 
aunque de esto nos ocuparemos posteriormente. 

La mayoría de los métodos de esas dos clases precisan parámetros como el 
camino que desea explorarse o el nombre del archivo que quiere eliminarse o 
crearse. Si vamos a actuar repetidamente sobre un mismo elemento, una mis 
ma carpeta o un mismo archivo, generalmente podemos recurrir a las clases 
D i rec tory Info y Filelnfo Islas, derivadas de F i leSys temí nf o, fací 
litan prácticamente las mismas operaciones c información pero mediante mé¬ 
todos v propiedades no compartidos, es decir, podríamos crear un objeto de 
estas clases para operar siempre sobre el mismo objeto. 


Unidades existentes en e\ sistema 

Suponiendo que el código que escribamos vaya a ejecutarse, va sea en un 
cliente o en un servidor, en un sistema luncionando con Windows, éste contará 



con uno o más unidades de almacenamiento. Podemos saber qué unidades te¬ 
nemos disponibles usando el métodoGetLogicalDri ves ( ) de la clase Direc- 
tory. I sta devuelve como parametro un arreglo de tipo String por lo que 
podemos usar las construcciones habituales para saber el número de elemen¬ 
tos v acceder a cada uno de ellos. 

Los valores contenidos en ese arreglo tienen el formato C: \, es decir, la le 
tra de unidad seguida de dos puntos y el habitual separador de caminí» de 
Windows. Pueden ser usados, por tanto, para acceder a la raí/ de la unidad, la 
cárpela en la que están contenidas todas las demás carpetas v archivos. Pode 
ni os usar cada uno de los elementos de GetLog j calDr i ves ( ) como camino 
para otros métodos que vamos a conocer de inmediato. 

Enumeración de carpetas y archivos 

Disponiendo de un camino, puede ser la raí/ de una unidad, el camino ai 
tiltil recuperado con el método esl.il ico GetCurrentDirectory ( ) o un cumi 
no bien conocido por nosotros, podemos obtener una lista de las carpetas v 
archivos que existen en el. Con ese fin se usan los métodos GeLD i rector ies ( ) 
vGetFi Les( ) que, como GetLogica 1 Orives ( ), retornan un arreglo de ca¬ 
denas con los nombres de las carpetas o los archivos, respectivamente. 

Cada elemento de los arreglos no contiene sólo el nombre de la carpeta o el 
archivo, sino que este se precederá del camino completo, incluyendo el nom 
brc de la unidad si es aplicable. Usando solo los cuatro métodos mencionados, 
todos compartidos \ de la clase Di rectory, podemos crear una aplicación de 
consola con el código siguiente para obtener el resultado de la figura 12 . 1 . 

Dim Unidad, Fiemen».o As String 


Consolé .Writel.ine( " f.Lsta de unidades en el sis Lema") 

Consol e. Wr iteLine ( M ---” ) 

For Each Unidad In Di rectory.GetLogicaLDi i ves ( ) 
Consolé .Wr ite r. i ne( Unidad) 

Next 


Conso 1 e . Wr I LeL i ne ( "- M ) 

Console.Write("Camino actual: ") 

Conso le.Writ el. ine( Directory.tiet Curre ni.Di rectory ( ) ) 


Con so i e . Wr i t et.ine( *---* ) 

Consol e . W: i • eíii ne { " Li s t a de carpetas en el camino M & Unidad) 

Consolé, wr i LeL i ne ( " — ---* " j 

For Each Elemento in Dírectory.GelDi rectories(Un idad ) 

Con so I e. Wr i LeLitie ( F l emen I. o) 

Next 


" > 


Conso le . Wr i tel.i nef " 








Consolé.WnteLine( "Lista de archivos en el camino " i Unidad) 

Consolé. WtiteLi ne( “---" ) 

For Each RlemenLo In Directory.GetFiles(Unidad) 

Console.WriLeLine< Element o) 

Next 


ai F:\DatosTrabajo\Ubros\Actua!es\PBVísualBaslcNET\EJemptos\... -pj»; 
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Figura 12.1. Enumeración de unidades, carpetas y archivos 


Si no tíos Ínteres,i sop.ir.ir las carpetas de los Archivos, en lugar de los méto¬ 
dos GeLFiles( ) v GetDirec tor íes ( ) podemos recurrir a GetFileSys- 
tem£ntries( ) Funciona como los dos anteriores, con l.i diferencia de ijue el 
arreglo de\ uelto contendrá todas las entradas de directorio existentes, sin dis¬ 
tinguir entre carpetas y archivos. 


Nota 

Los métodos GetDirectories(), GetFiles() y GetFileSystem- 
Entries( ) cuentan con una versión sobrecargada que acepta, además 
de una cadena con el camino, un segundo parámetro con una plantilla de 
los elementos a buscar. En éste pueden utilizarse los habituales comodines 
? y * para sustituir a un carácter o parte de un nombre. 


Información sobro un objeto 

Disponiendo del camino v nombro de un directorio, podemos utilizar los 
demás métodos GetXXX( ) de la clase Directory para obtener información 
adicional. I n caso di* que el objeto del que deseamos obtener información sea 
un archivo, en lugar de una carpeta, utilizaremos los métodos equivalentes de 
la clase File, también compartidos. 













C«idu carpeta y archivo tienen asociada una locha de creación, una locha de 
último acceso v oirá do ultima modil ¡ración. Son datos que podemos rocupe 
rar mediante los métodos GetCreationTime( ), GetLasLAccessTime( ) v 
GetLastWri teTime ( ), res per ti vamonte, de la (.laso Directoryo File de¬ 
pendiendo do que sea una carpeta o un archivo. H valor es devuelto como una 
estructura Da teTime. 

I os archivos tienen unos atributos que determinan si puede o no escribirse 
en ellos, si permanecen ocultos, están encriptados o comprimidos, etc. Un mis¬ 
mo archivo puede contar con varios de esos atribuios, por ejemplo al oslar 
comprimido, oculto v ser sólo de lectura. Kl método GetAttr ibu tes ( ) de la 
clase File facilita un valor en el que pueden existir varias de las constantes de 
la enumeración F i leAttributes. La tabla 12.1 indica el significado de algu¬ 
nas de esas constantes. 


Tabla 12.1. Constantes que denotan atributos de un archivo 


Constante 

Indica que el archivo 

Normal 

No tiene ningún atributo especial, es un archivo normal 

ReadOnly 

Es sólo de lectura 

System 

Es de sistema 

Hidden 

Está oculto 

Compressed 

Está comprimido 

Encrypted 

Esta enenptado 

Témpora ry 

Es temporal 

Directory 

Es una carpeta 

Archive 

Esta marcado para copia 

0 f f 1 i n e 

No está disponible 

SparseFile 

No es contiguo 


I .a mavoria de los métodos citados disponen de métodos complementarios, 
cuvo nombre comienza por Set en lugar de Get, siendo su finalidad facilitar la 
modificación del dalo que corresponda. Algunas de ellas son SetCreation- 
Time( ), SetLas tWr i teTime ( ) \ SetAtt r ibut.es ( ). Además del camino 
» nrrespondienle a l.i i arpela o el archivo sobre el que va actuarse, dichos meto 
«.ios tomaran un parámetro adicional con la lecha o los atribuios, según corres¬ 
ponda 

Unidades, caminoe y nombres 

Acabamos de ver que para operar sobre una carpeta o un archivo, iilih/nn- 
do cualquiera de los métodos conot idos en el punto anterior \ (Uros que trata¬ 
remos posteriormente, es necesario Lk ililar lo que se conoce como * twiiitt*. una 




cadena tie caracteres compuesta de letra do unid«id. una sucesión do nombres 
do carpetas v silbe arpólas v, finalmente, ol nombro de archivo. I os < ar.uloros 
utilizados para separar cada uno do esos elementos. sillín se india) antes, di¬ 
fieren do unas plataformas a otras, por lo que extraer una parlo del eamino, o 
oomponorlo <i partir de varios datos, pueden plantear alguna diíieultad. 

I n lugar de intentar hacer ese traba|o manualmente, escribiendo nosotros 
mismos el i ódigo para obtener el nombre do un archivo, un di reí torio o la ex 
tensión, podemos servirnos de los métodos compartidos de la clase Path. 

l'ara empezar, la clase Path dispone de varios miembros informativos que 
nos permiten saber cuales son los separadores usados en la plataforma actual: 
el separador de caí pelas en los caminos, el separador de caminos cuando se in¬ 
troducen varios, el separador de volumen v un separador alternativo. I amblen 
podemos saber ijiie caracteres no pueden utilizarse en un nombro de archivo o 
carpeta I n el código siguiente, correspondiente a una aplicación de consola, 
se muestra el valor de caita uno de esos miembros, generando el resultado do 
la figura 12.2. 


Dira Datos (, ) As String 

I < "A I t.D) reci oryííeparatorCli«u ", PaLh. Al tDirectory,s**pat atorChar ^, 

{"DirectorySepaiatOtChar ", PaLh.DirectorySeparatorCfoa r), 

("PathSepatatot", Path.PathSeparator \, 

("Vo1umeSeparaiorChai", Path.VolumeSeparatoxChar), 

(“ J nva 1 idPa LhCha rs", Path. I uvalIdPathChars H 

Dim Indice As Integer 

For Indice - 0 To Da los.CetUpperBound { 0 ) 

Console.WriLeLine("(0}- (1)", Datos|Indice, Q|, Datos { |ndi ce, 1)) 

Next 


ai F:\DatosT rabajo\Lfbros\Actuales\PBVIsual0asícNET\Ejemplos\.. «£' -|o | * 
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Figura 12.2, Caracteres utilizados en la composición de caminos 


Aunque podríamos guiarnos por los valores de Di rectorySeparatorChar. 
VolumeSepara torChar v los demás miembros para recorrer un i amino e in¬ 
tentar extraer sus elementos, lo cierto es que resulta mas fácil utilizar métodos 



como GetDirectoryName ( ), GetFileName ( ) o Ge t Ex tensión ( ). ti méto¬ 
do HasExtens ion ( ) indica si el camino incluye o no una extensión. También 
podemos obtener el nombre del archivo sin extensión con el método GetFile- 
NameWithoutExtension ( ), asi como cambiar la extensión por otra conChan- 
geExtensión ( ) l odos estos métodos toman como parámetro el camino sobre el 
que vaya a trabajarse. 

A pesar de que poco tienen que ver con la manipulación de caminos y sus 
elementos, otros dos métodos interesantes de la clase Path son GetTempPath ( ) 
Y GetTempFileName( ). ti primero devuelve el camino que podemos usar 
para alojar archivos temporales, mientras que el segundo crea un nombre para 
un archivo temporal que no entre en conflicto con ninguno otro existente. Pue¬ 
de comprobar el funcionamiento de todos estos métodos como en el caso ante¬ 
rior. simplemente enviando los resultados a la consola para poder comprobarlos 
En este caso el código podría ser el siguiente: 

if»l • • • n »* ,i wm • «#f* a » J . yt'i a .t ! i/.á ! 

Di.ro Carpeta As String - Directory . GetCurrentDi rectory 

' y recuperamos el primero de los archivos 

Dim Archivo As String - Directory.GetFiles(Carpeta){0} 

* *fp*«• • {, • w •• *•!>•.• 

Conso le.WriteLine( 

"Camino completo 11 " t» Archivo & vbCrLf & _ 

"Carpeta» “ & Path .GetDirectoryName (Archivo) b> vbCrLf o 
"Archivo 3 ’’ 6 Path.GetFi1eName(Archivo) & vbCrí.f & 

"Archivo sin extensión-* “ & _ 

Path.GetFi1eNameWithoutExtensión(Archivo) k vbCrLf & _ 

"Extensión 3 " & Path.GetExtensión(Archivo)) 

t * ti 1 • i, .. 

Consolé.WriteLine("Camino tras cambiar la extensión» " & _ 

Path.ChangeExtensión(Archivo, " . txt" ) ) 


Obi «“ «*4 •* i ■ *1 rt.lt . t • !F(n • . . I • * • 

’.ltlltbte í/r l'O f \á : 

Consolé.WriteLlne( 

“Carpeta temporal 3 " & Path. GetTempPath ( ) t. vbCrí.f i* 
"Archivo temporal 3 " i Path.GetTempFileName()) 


□ F:\DatosTrabaJo\Ubros\Camfnos.exe -¡°i*l 



Figura 12.3. Diseccionamos un camino en varios componentes 






Manipulación de carpetas y archivos 

Las clase 1 * Directory y File no sólo cuentan con miembros informativos, 
sino que también facilitan las operaciones que son mas habituales con carpetas 
y con archivos: creación, cambio ele nombre, eliminación, etc. lodos estos mé¬ 
todos necesitan como parámetro una cadena con el camino completo que identi¬ 
fica a la carpeta o el archivo sobre el que va a actuarse, dato que podemos haber 
obtenido previamente con los métodos que va conocemos. 

Ln el caso de la dase Directory los métodos que nos interesan son Create- 
Directory( ),Move( ), Deleteí ) y Exists( ). E\ primero crea la carpeta o 
carpetas necesarias para completar el camino indicado, el segundo mueve la 
carpeta v todo su contenido a un nuevo punto del sistema de archivos determi¬ 
nado por el segundo parámetro, el tercero elimina la carpeta y, por último, el 
cuarto comprueba si una cierta carpeta existe o no. 

La clase File dispone de métodos equivalentes a los que acaban de mencio¬ 
narse; Create( ). Move< ), Delete( ) y Exists( ), asi como un método adi¬ 
cional. llamado Copy { ), que nos permite copiar un archivo a otro punto o con 
otro nombre, también existen en File métodos que facilitan la apertura de un 
archivo para acceder a su contenido, comoOpen ( ),OpenWrite( ). OpenRead( ) 
y OpenText{ ). Se caracterizan por retornar un objeto de la clase FileStream 
o equivalente, que conoceremos en un momento. 

Cuando va a trabajarse reiteradamente en una misma carpeta o sobre un 
mismo archivo, en lugar de utilizar las clases Directory y File nos resultara 
mucho más cómodo crear un objeto de la clase DirectoryInf o o Filelnfo, 
según corresponda. F.l constructor de dichas clases toma como parámetro el 
camino de la carpeta o archivo que va a asociarse al objeto a crear, de tal ma¬ 
nera que posteriormente puede actuarse sobre ese elemento sin necesidad de 
métodos compartidos que precisan siempre el camino completo. Creado un 
objeto de la clase Filelnfo asociado a un archivo, por ejemplo, podemos usar 
propiedades como Attributes, Extensión o LasWriteTime para acceder 
a los atributos, recuperar la extensión o la fecha de última modificación. Para 
copiar el archivo, moverlo a otro punto o eliminarlo se utilizan métodos como 
CopyTo( ), MoveTo( ) v Delete( ) que, a diferencia de los mencionados an¬ 
tes. no necesitan que se les indique el camino v nombre del archivo 


A cceeo a I contenido de loe archivoe 

Va sabemos como obtener información y manipular los archivos como uni¬ 
dad indisoluble, afectando a todo su contenido. Aunque en algún momento 
puede interesarnos cambiar de nombre, eliminar o copiar un archivo, lo cierto 
es que la mavoria de las aplicaciones se limitan a abrirlos, leer o escribir infor¬ 
mación de ellos y cerrarlos. 

Para ello utilizaremos distintas clases de las que vamos a ocuparnos en el 
resto de este capítulo. 



Para acceder al contenido de un archivo trabajaremos con objetos de alguna 
clase derivada de Stream. Ésta, definida en System. 10 como el resto de las 
que hemos conocido hasta ahora, es una clase abstracta, es decir, no pueden 
crearse objetos a partir de ella, utilizada como base de las clases FileStream, 
MemoryStream. Buf feredStream, CryptoStream y NetworkStream. ca¬ 
da una de ellas especializada en almacenar o recuperar el flujo de información 
de un cierto medio, como por ejemplo puede ser el disco, la memoria o bien 
una conexión de red. 

Que todas estas clases tengan una ascendente común facilita nuestra labor, 
ya que conociendo los miembros de Stream sabremos como trabajar con cual¬ 
quiera de sus derivadas. Es lo primero que vamos a hacer, conocer algunos de 
los miembros de Stream. 

Metodología general 

Como acaba de decirse, nunca crearemos un objeto de la clase Stream sino 
que nos serviremos de sus clases derivadas. Al crear un objeto de una de esas 
clases, como puede ser FileStream o NetworkStream, debemos facilitar al 
constructor un parámetro que le permita acceder al dispositivo o fuente de la 
que se obtendrá la información. En el caso de FileStream, por ejemplo, ese 
parámetro será un camino completo con el nombre del archivo, mientras que 
con NetworkStream el parámetro necesario es un número de s ockrt ECP/IP. 


Nota 

Las clases NetworkStream y CryptoStream, aunque son derivadas de 
Stream, no se encuentran en el ámbito System, io sino en ámbitos es¬ 
pecíficos relacionados con el trabajo en red y la seguridad. 


Una vez tenemos el objeto creado, antes de realizar ninguna operación de 
lectura, escritura o desplazamiento podemos comprobar si dichas operaciones 
son posibles en el flujo que hemos obtenido. Con este fin consultaremos las pro¬ 
piedades CanRead, CanWrite y CanSeek que, como puede suponer, son de 
tipo Boolean. Las tres son también sólo de lectura. 

Para leer v escribir datos en el flujo tenemos dos parejas de métodos; Read- 
By te ( ) y Read( ), para lectura, y WriteByte( ) y Write( ), para escritura. 
Los primeros leen o escriben un solo byte, mientras que los segundos leen o es¬ 
criben una secuencia de bytes. WriteByte( ) necesita como único parámetro 
el byte a escribir, mientras queReadByte{ ) no toma parametros y devuelve e! 
dato leído como un Integer. 

Los métodos Read( ) y Write( ) toman ambos tres parametros: un arreglo 
de tipo Byte en el que va a almacenarse o donde se encuentra la secuencia de 
bytes, un entero indicando el elemento de ese arreglo a partir del que se alma¬ 
cenará v. en tercer lugar, otro entero especificando el número de bvtes a escri¬ 
bir o leer. En los dos casos la posición, entregada como segundo parámolro. 



hau* referencia ci 1 punió del timólo donde van a alojarse los bvtes leídos o se 
encuentran los bvles a escribir, no a la posa ion relativa en el flujo. 

t liando se abre un Mujo di» dalos se crea un puntero o marcador que, gene¬ 
ralmente, se sitúa al inicio de ese Ilujo. Cada ve/ que se efectúa una operación 
de lectura o escritura el marcador si* desplaza hacia delante, indicando la po¬ 
sición donde se efectuará la próxima operación. I n raso de que la propiedad 
CanSeek tenga el valor True podemos mover ese marcador libremente, deter¬ 
minando nosotros mismos cual será el punto del flujo en el que se escriba o del 
que se lea. 

La propiedad Length contiene el numero de bvtes de información existen¬ 
tes en el Ilujo. Conociendo este dalo, podemos usar la propiedad Pos i t ion 
lanío para saber cual es la posición actual como para modificarla, lina asigna 
don a esta última propiedad puede causar una excepción NotSupported- 
Exception en caso de que el flujo no permita cambiar la posición, poi ello es 
importante comprobar antes el valor de CanSeek 

Ademas de los métodos citados para lectura v escritura, en la clase Stream 
también existen otros que facilitan el lanzamiento de operaciones asme roñas 
de lectura v escritura I slas no bloquean la ejectu ion del proceso principal sino 
que invocan a un método de retorno, ajustado al delegado AsyncCallback, 
cuando la lectura o escritura ha terminado. 

I mal izado el Irabajocon el Ilujo de datos, una llamada al método Cióse ( ) 
lo cerrará liberando los recursos que pudieran haberse asignado. I s|e cierre, 
no obstante, no destruye el objeto Stream que estemos usando 

Apertura de archivos 

Para leer v almacenar información en un archivo en disco usaremos habi- 
tualmenle la clase FileStream Su constructor precisa de dos a seis parámetros, 
dependiendo de la versión que usemos va que se facilitan varias implementa 
ciones distintas Usualmente indicaremos el nombre del archivo a abrir, mclu 
vendo el camino completo, uno de los valores de la enumeración FileMode 
indii ando el modo de apertura \ uno de los \ alores de F i leAccess comum 
cando el uso que vamos a hacer del archivo. I os modos de apertura disponi¬ 
bles son los mostrados en la tabla 12 2. mientras que la tabla 12.2 corresponde 
.i los valores de la enumeración FileAccess 

Tabla 12.2. Valores de la enumeración FileMode indicando el modo 
de apertura del archivo 

Constante Cómo se abre el archivo 

Open Asumiendo que existe 

CreateNew Creándolo o generando una excepción si existe 

Crea-te Creándolo de nuevo incluso si existe 


OpenOrCreaie Normal si existe o creándolo en caso contrario 




Constante 

Cómo se abre el archivo 

Trúncate 

Asumiendo que existe y truncando su contenido tras la apertura 

Append 

Asumiendo que existe y situando el marcador al linal para añadir 
datos 

Tabla 12.3. Valores de la enumeración Fi leAccess indicando 
las operaciones en el archivo 

Constante 

Operación que podrá efectuarse en el archivo 

Read 

Lectura 

Wr i tie 

Escritura 

ReadWr i te 

Lectura y escritura 


Estos mismos valores serian los que utili/aríamos si en lugar de croar direc¬ 
ta monte un objeto ilo la clase FileStream, usando algunos de sus constructo¬ 
res, lo obtuviésemos medíanle el método Open ( ) de las clases File o Fi leí rifo. 
F.n este último caso, con Filelnf o. Open ( ). no tendríamos que facilitar el 
nombre del archivo \ el camino va que dicha información se facilita al crear ob¬ 
jeto Filelnfo. 

Sabiendo como abrir un archivo v conociendo, aunque tan solo de manera 
teórica, los métodos con que cuenta la dase Stream, estamos en disposición 
de escribir un pequeño ejemplo que lome un archivo, recupere su contenido v 
lo muestre por la consola. El código de este programa podría ser el siguiente: 

Sub Main( ) 

Diro CaminoActoal As String * Directory.GetCurrentDirectory 

Dim UnArchivo As String - DirecLory.GeLFi les (Can i noAc tua1)(0) 

Dim Dato As Integer, índice As Integer 


Dim FSArehivo As FileStream - New FileStrearo( 

UnArchivo, F i leMode.Open, FileAccess.Read) 

Console.Wr i teJ.i ne( "Información del archivo tU)", UnArchivo) 


For Indice - 1 To FSArchivo.Length 
Dato ~ FSArchivo.ReadByte 

Consolé.Write(" {0> (<l>){2>". Dato, _ 

IIf(Da to > 31, Chr(Dato), vbTab) 

Nex t 

Consolé . Readl.ine ( ) 

End Sub 

En la figura 12.1 puede ver el resultado, en este caso bastante legible porque 
el archivo leído no era muy extenso. 





□ F:\DatosTrabajo\Ubros\LecturAArch1vo.exe 



Figura 12.4. Información recuperada por el programa de un archivo 

De la misma forma podríamos escribir datos en un archivo, por ejemplo un 
fichero temporal. I a información podríamos solicitarla por la consola, como se 
hace en el ejemplo siguiente: 

Sub Main () 

Dim NombreArchivo As String = Path.GetTempFileName 

Dim fr'SArchivo As New Fi 1 eSt.reamí NombreArch i vo, 

FileMode.Create, FileAccess.Write) 

Dim Linea As String, Indice As Integer 


Consolé.WriteLine("Introduzca lineas de datos. " & _ 

"Deje la linea vacia para terminar") 

Do 

Consolé.Write("Dato: “) 

Linea * Consolé.ReadLine 

For Indice = 0 To T .i nea. Length - 1 


FSArchivo. Wr i l.eBy ce { Asc< Linea.Chars( Índice ) ) ) 

Next 

Loop Wbile Linea <> "" 

FSArchivo.Cióseí) 


Consolé .WriteLine (" Tn formación escrita en " i» NombreArch i vo ) 

End Sub 

Observe que para escribir en el flujo de datos, el archivo, la cadena de ca¬ 
racteres obtenida de la consola la recorremos carácter a carácter, algo no muv 
eficiente. El resultado, no obstante, es el esperado ya que al tener que esperar 
la entrada de datos por parte del usuario el rendimiento no es precisamente un 
problema. En la figura 12.5 puede ver la ejecución del programa, mientras que 
la figura 12.6 muestra en el Bloc de notas el contenido del archivo. Fíjese en 






que no hav separación entre los datos ya que los hemos escrito bvte a b\ te. sin 
introducir ninguna separación. 


co F:\DatosTrabajo\Libros\Actuales\PBVjsudlBasicNET\Ejemplos\... ■{□! *j 


l'«t i» • t ai' i T i 'i in i' i i i ' á * .1 ' éÍ ' 

P«tu: Fe)n*«i'u 

IMln! tlnr.-fl 
Wtirll 

P«tu: Hj»v* 

Dato; Junio 
Doto! 

Inf nrnoc ion mnrtt* en tJ:\BOCTIHi~i \FBftWCI “IsCOfiriC¡**| •wfettip'.»npiCH.lnp 
Pruqs <inV Kny tn c«nl inue. 


Figura 12.5. El programa escribe los datos y nos indica el archivo donde 
se encuentran 


tmpECF.tmp - Bloc de notas 

£i»ixjn Fu»moto ya Afyda 

K r>* r of * b r *r »<• ro Ahr il m » 3 un 1 o 
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Figura 12.6. Contenido del archivo finalizada la ejecución del programa 


Patos con tipo 

I os métodos Wr i te ( ) \ Read ( ), así como WriteByte() v ReadWri te ( ), 
heredados de la clase Stream son de bajo nivel, va que tan solo nos permiten 
trabajar con beles individuales o secuencias de bvles. (. orno ha visto en el pun¬ 
te» anterior, para escribir una cadena de caracteres es necesario tratarlos de ma¬ 
nera individual convirliéndolos al tipo Byte. o bien convirtiendo previamente 
la secuencia di* caracteres en un arreglo de tipo Byte. 

I n el ámbito System. 10 nos encontramos clases mas especializadas, como 
StreamReader v StreamWriter, que facilitan la lectura v escritura de datos 
que se ajustan a los tipos que va conocemos \ estamos habituados a usar en \ a 
nables v propiedades, lanío StreamReader romo StreamWriter disponen 
de múltiples constructores, de tal turma que podemos crear un objeto entre- 




gando el camino y nombre de un archivo, un objeto derivado de Stream sobre 
el que deseamos trabajar y otros parámetros adicionales como la codificación o 
el tamaño del espacio intermedio de trabajo. 

También podemos utilizar los métodos OpenText(), CreateText() y 
AppendText ( ) de la clase Filelnf o, obteniendo a cambio un objeto Stream- 
Reader, en el primer caso, o StreamWriter, en el segundo y tercero, asocia¬ 
do al archivo representado por el objeto Filelnfo. También podemos utilizar 
los métodos homónimos de la clase File, en este caso facilitando como primer 
parámetro el camino y nombre del archivo a abrir 

Para escribir datos, utilizando un StreamWriter. usaremos los métodos 
Write( ) v WriteLine( ) que, de manera análoga a los métodos del mismo 
nombre de la clase Consolé, pueden tomar parámetros de distintos tipos: ca¬ 
racteres, números enteros y decimales, cadenas, etc. Fl método WriteLine( ), 
además, introduce automáticamente un salto de linea al linal de los datos. Con 
estos dos métodos, por tanto, podemos introducir cualquier información en el 
Ilujo de datos sin necesidad de efectuar conversiones previas. 

La clase StreamWriter facilita varios métodos de lectura: Read ( ), con 
dos versiones distintas, ReadLine( ) y ReadToEnd( ). El primero lee un solo 
carácter o un número máximo de caracteres, dependiendo de la versión que 
utilicemos. El segundo lee una línea completa y la devuelve como un String, 
mientras que la última lee hasta el final del flujo v lo devuelve como una cade¬ 
na de caracteres. Si deseamos saber cuál es el siguiente carácter que hay en el 
flujo, leyéndolo pero sin hacer avanzar el marcador de posición, podemos uti¬ 
lizar el método Peek( ). 


Nota 

TantoStreamWriter comoStreamRead utilizan un derivado destream 
para acceder a los datos, ya se lo hayamos facilitado nosotros mismos co¬ 
mo parámetro o lo hayan creado ellas mismas. Podemos recuperar la refe¬ 
rencia a esestream mediante la propiedadBaseStream, lo cual nos abre 
las puertas a usar cualquiera de los métodos que hemos conocido previa¬ 
mente para tratar flujos de datos. 


Un visor de archivos de texto 

Sirviéndonos de las dos clases que acabamos de conocer, StreamReader y 
StreamWriter, vamos a crear un ejemplo algo más elaborado. En este caso 
iniciaremos una aplicación basada en formularios Windows, siendo su finali¬ 
dad permitir la lectura y modificación de archivos de texto. Para ello vamos a 
comenzar insertando en el formulario los componentes que pueden verse en la 
figura 12.7: un ComboBox con el titulo ''Seleccione una un idad" sobre el, 
dos ListBox con los ti tu los "Seleccione una carpeta" v "Seleccione 
un archivo" sobre ellos, un TextBox con el titulo "Contenido del archi¬ 
vo" v un Button. Asignamos un nombre a cada uno de estos componentes 




modificando su propiedad Ñame, editando también la propiedad Anchor pa¬ 
ra que el formulario pueda cambiarse de tamaño sin problemas \ los controles 
aprovechen lodo el espacio disponible. 



Figura 12.7. Aspecto del formulario durante la fase de diseño 


Para que esta intertax sea funcional tendremos que asignar código a distintos 
eventos, listos irán encadenándose en una secuencia que causara la actual i/a¬ 
ción completa de lodos los componentes que hemos dispuesto en el formula¬ 
rio. Para empezar, el evento de apertura del formulario lo aprovecharemos 
para recuperar la lista de unidades lógicas existentes en el sistema, añadiéndo¬ 
las ionio elementos al conlrol ComboBox que aparece en la esquina superior 
izquierda. Una selección deesa lista causará un evento, un cambio de unidad, 
que aprovecha remos para leer la lista de carpetas v mostrarla en la lista que hav 
debajo. 

De manera análoga, la selección de un elemento de la lisia di* cárpelas pro 
votará un evento al que responderemos con la recuperación de la lista de archi¬ 
vos que hay en ella, mostrando los nombres en la lista que hay a la derecha. Al 
elegir uno de los archivos se producirá un nuevo evento que. en este taso, nos 
servirá para abrir dicho archivo v mostrar su contenido en el TextBox que hav 
en la parte interior Por ultimo, la pulsación del bolón Guardar lomar,i el ion- 
tenido de la caja de texto y lo escribirá en el mismo archivo. 

I I código completo del programa, con comentarios explicativos, es el mos¬ 
trado a continuación. Al ejecutar el programa verá aparecer de inmediato una 
unidad, las carpetas que hay en ella v una lista de archivos con extensión txt, 







¿isi como el contenido del primero de ellos. Si modifica el texto y pulsa el botón 
verá que los cambios se escriben en el archivo. 


Prívate Sub Form1_Load(ByVal sender As System.Object, 

ByVal e As System.EventArgs) Handles MyBase.Load 
Dim Unidad As String 


For Each Unidad In Directory.GetLogicaiDrives 
cbUnidades.Items.Add(Unidad) 

If Unidad - M C:\" Then 


' • j ; * » 

cbUnidades.SelectedIndex = cbUnidades.1tems.Count - 

End If 
Next 
End Sub 


1 


Prívate Sub cbUnidades_SelectedIndexChanged( 

ByVal sender As System.Object, ByVal e As System.EventArgs ) 
Handles cbUnidades.Selected1ndexChanged 
Dim Carpeta As String 

1bCarpetas.Items.Clear() 

For Each Carpeta In Di rectory - Ge tDirec Lories(cbUnidades.Tex t) 

lbCarpetas.Items.Add(Path.GetFileÑame(Carpeta)) 

Next 

1bCai petas.Selectedlndex = 0 

End Sub 


Prívate Sub lbCarpetas_SelectedlndexChanged( 

ByVal sender As System.Object, ByVal e As System.EventArgs) 
Handles 1bCarpetas.SelectedIndexChanged 
Dim Archivo As String 
1bArchivos.1tems.Clear() 

For Each Archivo In Directory.GetFiles( 

cbUnidades . Text & 1 bCarpetas . Tex t, M *.txt**) 

IbArchivos.Items.Add(Path.GetFileMame(Archivo)) 

Next 

If 1bArchivos.1tems.Count <> 0 Then 
IbArchivos.Selectedfndex - 0 

Else 

tbCont en ido . Tex t - 1 " " 

End If 
End Sub 


Prívate Sub IbArchivos_Selected!ndexChanqed( 
ByVal sender As System.Object, 

ByVal e As System.EventArgs) 

Handles IbArchivos.SelectedIndexChanged 



' ¡ i) t/ffil'.'* Ji- . . i. :.»» 

Dira NombreArchivo As String = _ 

cbünidades.Text f> lbCarpetas .Text & 

Path.DirectorySeparatorChar i _ 
lbArchívos.Text 

1 y *o <srrnPOK p.t:.i 

Dira SRArchivo As StreamReader ** _ 

File.OpenText(NombreArchivo) 

. *,• / • *'rn i n i <>:rfp .1 ¡ • j<•(<■ * * 1 f' r 1 • • ti,. .« • • 4 lt.. 

tbContenido.Text = SRArchivo.ReadToEnd 

SRArchivo. Cióse { ) ' • • 1 . 

End Sub 

Ai /b.*ÍK** »• ? h >••• t • j 1 •»1 1 * 

Private Sub Button1_C1ick(ByVal sender As System.Object, 
ByVal e As System.EventArgs) 

Handles Buttonl.Click 

Dim NombreArchivo As String = _ 

cbünidades . Text f» lbCarpetas. Text & _ 

Path.DirectorySeparatorChar ¿ 

IbArchivos.Text 
/ *p r+air-o/: nvc»*> 

Dira SRArchivo As StreamWriter = __ 

File.CreateText< NombreArchivo) 

* j .,•*<* • * • <• •- »•<*. t-n +■ l .*••*•» .‘i 

SRArchivo.Write(tbContenido.Text) 

SRArchivo.Close( ) • * : tn -\f , • 

End Sub 
End Class 



Figura 12.8. El visor de archivos de texto en funcionamiento 










Flujos binarios 

I as clases StreamReader y StreamWriter se caracterizan por trabajar 
con i lujos do datos en los que la información que se lee v escribe osla compues¬ 
ta de secuencias de caracteres Si usa un St reamWriter para, por ejemplo, 
escribir números y valores Bolean, al examinar el archivo podra comprobar 
que los datos son legibles. I'slo es asi porque S treamWriter introduce en el 
Ilujo la representación textual de los datos, v no los datos en si tal \ como si' al¬ 
macenan en la memoria del ordenador. 

In el ámbito System. 10 existen otras dos c lases, B i naryReader y Binary- 
Writer que, manteniendo (‘I mismo tuncionamionlo básico descrito antes para 
StreamReader \ StreamWr i ter. están especializados en la lectura v escritu¬ 
ra de datos pero manteniendo su formato binario. BinaryWr i ter dispone del 
método Write( ) con multitud de versiones sobrecargadas aceptando distin¬ 
tos tipos de parametros, como StreamWriter, pero la diferencia está en el 
formato con que st* escriben los datos. Ln BinaryWr i ter no existe el método 
WriteLine( ), ya que no esta pensada para tratar con archivos de texto 

Podemos ver rápidamente la diferencia entre usar StreamWriter y Binary¬ 
Wr i ter con un sencillo ejemplo, una aplicación de consola que ejecutaría el 
código siguiente: 

Sub Main ( ) 

Dim ArchTexto As String = Path.GetTempFi1eName 

Dira ArchBinario As String * Pa th .GetTempFi leName 

Dim DaLos<) As Object = (2S996290, 166.386, True, "Hola"! 

Dim Dato As Object 

Dim SWTexto As New St i eainWt i ter { ArchText.o ) 

■ • •• h »« 

Dim BWBinario As New BinaryWriter( _ 

New FileStreamfArchBinario, Fi 1eMode.Create)) 


For Eacb Dato In Datos 

n '.tii*, ,r . (W'« 

SWTexto.Write(Dato) 

* *.»<i i»' « • ti.'llb 

BWBinario.Write(Dato) 

Next 


f* • »“»»* *..*w .1,* <• 

SWTexto.Cióse() 

BWBinario.Closet) 

Conso le.WriteLine(”Texto -> {0>{1}Binario -> <2} M , 
ArchTexto, vbCrLt, ArchBinario) 

End Sub 


Ll resultado, en la consola, seria la comunicación de dos nombres de archi¬ 
vo. Al abrirlo encontramos el resultado de las figuras 12.^ y 12.IU. l a primera 



corresponde al archivo generado por el StreamWriter, en la que podemos 
ver que los dalos son perfectamente legibles. Un la segunda, por el contrarío, 
aparece una información no legible por nosotros. 



Figura 12.9. Archivo generado por el objeto StreamWriter 



Figura 12.10. Archivo generado por el objeto Binarywriter 

Complementariamente a BinaryWriter, la clase BinaryReader dispone 
de métodos para leer práctica mente cualquier tipo de dato: ReadByte ( ). Read- 
Char ( ), ReadDec ima 1 ( ), Readlnt32 < ). ReadString( ) ReadBoolean ( }. 
etc Cada uno de ellos recupera del ilujo un número lijo de bytes dependiendo 
del tipo de dato v efectúan la conversión adecuadamente para devolverlo. 

Flujos en memoria 

Ya sabe que F i leStream, la clase que hemos usado para recuperar v alma¬ 
cenar información en archivos en disco, es tan sólo una de las derivadas de la 









clase genérica Stream. Oirá de las derivadas es MemoryStream, un 11Lijo que 
utiliza la memoria como dispositivo de almacenamiento. Puedo ser usada para 
almacenar información temporal, en lugar de usar un archivo que puede nece- 
sitai mas recursos v siempre sera mas lento. 

Como derivado de Stream. un objeto de la clase MemoryStream dispono 
práctica mente de los mismos miembros que hemos usados con FileStream. 
Por tanto sabemos como escribir y leer información, obtener la longitud, lilai¬ 
la posición del marcador o corral el Ilujo. Una ve/ creemos un objeto Memo¬ 
ryStream éste contara con una i apacidad sol»» limitada por la memoria dispo¬ 
nible en el sistema. 

Dicha capacidad va ajustándose a medida que se introducen datos \ pode 
mos conocerla leyendo la propiedad Capacity también es posible allerar el 
valor di* dicha propiedad para establecer manualmenle la capacidad. 

I n cas»» necesario la ¡ntormacion contenida en un MemoryStream puede 
ser escrita en otro llu/ode datos, por ejemplo un FileStream, almacenándola 
en un dispositivo no volátil. 

C on ese I in se utiliza el método WriteTo( ) que, como único parametro, ne¬ 
cesita un objeto de una clase derivada de Stream. 

Otra alternativa, para trabajar con flujos de dalos en memoria, consiste en 
ulili/ar las clases stringWriter v StringReader listas son similares a 
StreamWriter v StreamReader, contando prácticamente con los mismos 
miembros para lectura y escritura, pero en lugar de usar un Stream como me¬ 
dio de almacenamiento se sirven de un Str ingBuilder que, al fin v al cabo, 
no es más que una secuencia de caracteres en memoria 


Puntos clave 


• l\l ámbito System. 10 de la plataforma NI. I aloja una serie de clases que 
facilitan la manipulación de carpetas y archivos, así como el uso de flujos 
lie dalos para gestionar la entrada v salida de información. 

• Las clases Di rector y v Fl le están compuestas exclusivamente de méto¬ 
dos estáticos que facilitan información sobre carpetas v archivos, permi¬ 
tiendo también las operaciones de manipulación básicas: creación, borrado 
\ renombrado. 

• Mediante las clases Directory Inf o y Fi lelnfo es posible crear obje¬ 
tos asociados a carpetas o archivos, simplificando el trabajo reiterado con 
estos elementos sin necesidad de tenor que facilitar el camino v nombre 
en cada paso. 

• Todas las clases que gestionan Ilujos de datos en diversos dispositivos o 
medios están derivadas de Stream, por lo que cuentan con un grupo de 
miembros comunes. 

• Para trabajarcon archivos en disco se utiliza la clase FileStream, mien¬ 
tras que para mantener información en memoria existí* MemoryStream. 



• Existen varias clases, derivadas de TextFeader y TextWr i ter, que I«i- 
c i litan las operaciones de lectura y escritura en los flujos de dalos. Algu¬ 
nas de estas clases son StreamReader, StreamWr i ter, BinaryReader 
Bi naryWr i ter. StringReader y St r ingWr i ter. 

Res>um<?ii 


Este capitulo nos ha servid»;) para conocer los elementos más importantes 
del ámbito System. 10, imprescindibles para poder almacenar \ recuperar in¬ 
formación de archivos en disco. Ln general, usaremos estas clases cuando ne¬ 
cesitemos manipulare! sistema de archivos o bien trabajar con información no 
alojada en bases de datos. 

Como veremos en un capitulo posterior. Visual Sludio .NE I dispone de to¬ 
dos los elementos necesarios para poder trabajar con bases de datos como Access 
oSQE Server, siendo el mecanismo preferente a la hora de mantener de forma 
permanente los datos de la aplicación. Los elementos conocidos en este capitu¬ 
lo, por tanto, tienen un uso más secundario. 





Elaboración 
de aráflcoe 


Si rn el uipitillo anterior apuntábamos qm* los servó ios do entrada v salida 
do \ isii.il Basó NI I siiponitin una mejora considerable, respecto .1 los existen- 
los on versiones previas, lo mismo podríamos dooir al tratar los servíaos para 
elaboración do gráficos. Hasta la versión 0.0 prácticamente seguíamos contan¬ 
do con las mismas posibilidades gradeas que existían en los tiempos del liVV- 
BASIC . con ordenes como Point, Line o Circle y poco mas I as versiones 
de* BASIC existentes en muchos mu roordonadores de hace veinte anos teman 
mas posibilidades gradeas ipie Visual Basic ó, una herramienta presentada a tí¬ 
ñales de los noventa. 

(. orno consuelo, paliando en parte la taita de servil ios gradeos en el propio 
lenguaje, quedaba la posibilidad de Usar las funciones del ( .DI {Cn¡f»hii> De i'i ir 
Inlrt lfh v). nombre con el que se denomina genéricamente al conjunto de servi¬ 
cios de Windows relacionados con gradeos. I I inconveniente es que para ello 
se precisa la definición previa, en Visual Basic, de centenas de funciones, cons 
tiintes, enumeraciones v tipos de datos, va que no existe ninguna biblioteca de 
tipos ni recurso equivalente que facilite su use» desde este entorno 

I as posibilidades gradeas de Visual Basó NI I' son las de la propia platalor 
111.1 NI I. niuv superiores «1 las de versiones pre\ ias v a las de ( .DI I slos servi¬ 
cios se agrupan en una serie de ámbitos con nombres a los que generó ámenle 
se llama l .1)!+. Basta una importa* ion de esos ámbitos en nuestro provee l*» pa¬ 
ra tenor a nuestro alcance lóele» le» necesario para la elaboración ele grádeos en 
el plano bidiiricn.smnal, la manipula! ion de* imágenes, impresión, ote Será el 
tema que nos ocupe e*ste capilule», dedicado a la visuali/ae ion ele esos grató os, 
v el próximo, centrado en los temas de impresión. 








Ámbitos relacionados con GD\+ 


Los servicios de GDI+ forman parte de la plataforma Microsoft NET, lo 
cual significa que están disponibles para cualquier lenguaje de programación 
.NLT v, asimismo, desde cualquier tipo de proyecto. 

listo implica que podemos utilizar GDI+ tanto para dibujar en un formula 
rio Windows como para enviar un gráfico en una pagina web, indistintamente 
con Visual Basic -Ni I, C s , Visual C++ .NLT, |« o bien cualquier otro lenguaje 
NLT 

listos servicios se alojan en su mayor parte en un ensamblado que se aloja 
en el modulo System. Drawi ng.Dl 1. ensamblado que consta de varios ámbi¬ 
tos con nombre que estructura las clases de objetos v tipos según la finalidad 
concreta para la que están diseñados. 

I I ámbito de primer nivel, del cual cuelgan los demás relacionados con 
GDI-*, es System.Drawing. Utilizando el Examinador de objetos de Visual 
Basic .NET (véase figura 13.1) puede acceder al contenido de esos ámbitos 
para conocer sus miembros. 
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Figura 13.1. El ámbito System.Drawing es la raíz de los servicios GDh 


Para comenzar, vemos brevemente cuál es el contenido de cada uno de los 
ámbitos existentes en System. Draw i ng para adquirir una visión general de 
lo que tenemos a nuestra disposición. 





Elementos de propósito general 

Plómenlos proposito general son los que encontramos en el propio ámbi¬ 
to System . Drawing. en forma Je clases, enumeraciones y estrudliras que re¬ 
sultan básicas a la hora de trabajar con gráficos, independientemente de su 
naturaleza 

Fnlre las estructuras más usadas están Point v Rectangle. 1.a primera di* 
ellas se utiliza para mantener y manipular las coordenadas de un punto, mien¬ 
tras que con la segunda también se opera sobre unas dimensiones. Size es 
complementaria de Point, almacenando unas dimensiones sin un punto de 
origen, como si tiene Rectangle Pstas tres estructuras almacenan interna¬ 
mente las coordenadas y dimensiones como un Integer Pxisten tres equiva¬ 
lentes, llamadas PointF, RectangleF y SizeF que, manteniendo la misma 
finalidad y funcionalidad, usan un Single para almacenar los datos 

Color es otra de las estructuras básicas. Con sus miembros es posible com¬ 
poner cualquier color, ya sea utilizando algunas de las constantes predefinidas 
con nombres de colores o a partir de sus componentes do rojo, verde y azul 
Las clases Pen, Brush, Font y Bitmap representan entidades básicas de 
dibujo, en este caso el lápiz para pintar bordes \ contornos, la brocha para los 
rellenos, las características del texto o los puntos de una imagen Fn los miem¬ 
bros Pens v Brushes tenemos un conjunto predefinido de lápices y brochas. 

Otra de las clases importantes es Región, mediante la cual puede represen¬ 
tarse cualquier figura gráfica compuesta de otras entidades. Las regiones facili¬ 
tan el escalado y transformación de los gráficos 

Lodos los elementos anteriores se utilizan para dibujar sobre un.) superfi¬ 
cie, un concepto que, en el caso de GDI+, se representa mediante un objeto de 
la clase Graphics. lista cuenta con multitud de métodos que facilitan el dibujo 
de entidades relativamente simples: lineas rectas, arcos, curvas, polígonos y 
cadenas de caracteres. Después veremos cómo obtener un objeto Graphics 
para dibujar sobre un formulario Windows. 


Nota 

También es posible dibujar directamente sobre una imagen en memoria, lo 
que se conoce habitualmente como un bitmap o mapa de bits. 


Gráficos vectoriales y 2P 

Cuando los elementos existentes en System. Drawing no son suficientes 
para poder trazar gráficos mas complejos, basados en caminos, regiones, bro¬ 
chas complejas, fundidos de color v, en general, gráficos en dos dimensiones 
de cierta complejidad, tendremos que recurrir entonces a los elementos del 
ámbito System. Drawing . Drawing2D. 

Con las clases HatchBrush. PathGradientBrush y LinearGradient- 
Brush podemos crear brochas para rellenos complejos, utilizando patrones v 




degradados dr color. Istos pueden ser lineales, de un coloi .1 uln> siguiendo 
uno linea red.) hori/onlal, vertical o inclinada, o bien seguir un eierli> camino, 
por ejemplo con un«i lisura no recular 

Usando las c lases Ad justableArrowCap \ CustomLineCap podemos de- 
1 1 nir elementos gradeos a medida para dibujar en los extremos de las (meas 
Oirá di 1 Lis clases que leñemos en ese ámbito es Mat rix Con ella es posible 
definir matrices sobre las que efectuar posteriormente traslaciones, rotaciones 
v escalados. I stasoperai iones pueden aplicarse a entidades gráíii as, consiguien¬ 
do rícelos de cambio de tamaño, rotación en cualquier eje v modificación de 
posición en el esp.u io bidimensional 

Más adelante, en este mismo capitulo, veremos como usar algunos de estos 
elementos para crear electos gráficos que en Visual Basic fi requerirían un trá¬ 
balo mucho mavor. 


Manipulación de imágenes 

I ras el ámbito «interior, siguiendo el orden en que aparecen en el Examina¬ 
dor de objetos, nos encontramos con otro llumadoSystem. Drawinq . Tmaging. 
I n su interior hav clases para el tratamiento de imágenes tanto vectoriales u> 
mo basadas en mapas de bits. 

(iraeias a un mecanismo basado en codificadores v drst edificadores total¬ 
mente extensible, representado por la clase Encoder, es virlualmente posible 
trabajar con cualquier formato gráfico. I n principio, es posible recuperar image 
lies de tipo BMP, EMF, GIF, JPG, PNG. TIF v WMF. Usando clases comoCo 1 orMap 
v ColorPa lette se delineo las paletas de colores, mientras que B i tmapDala 
contiene los datos de la imagen propiamente dicha e ImageAttributes sus 
atributos. 

I sando la clase Metafile podemos crear archivos de gráfico vetlurial re¬ 
gistrando en ellos todas las primitivas para su lomposu ion I ste registro pue¬ 
de ser, posteriormente, reproducido sobre una superficie de dibujo 

también encontramos en este mismo ámbito las clases necesarias para Ira 
lar con paletas de color, indispensables cuando los puntos que componen una 
imagen no representan valores de color real sino que actúan romo índices de 
una tabla limitada de colores. 

Impresión 

I-I ámbito System. Drawi ng . Printing, «.leí que nos ocuparemos con deta¬ 
lle en el próximo capitulo t.il v como se indicaba antes, contiene los elementos 
necesarios para hacer posible la publicación de información. 

Con las clases existentes en dicho ámbito podremos configurar los pará¬ 
metros de impresión, preparar una vista previa del documento v, finalmente, 
enviarlo a un dispositivo de impresión que, en la práctica, no tiene poi que ser 
una impresora, va que existen dispositiv os de impresión que actúan como in¬ 
termediarios para el em 10 de documentos por fax, la generación dr documen¬ 
tos digitales tipo IM)I-, etc 



Tipografías 

II último dr Ion ámbitos ivl.uion.uto con (i DI» es Sys tem. Drawing . Text 
que, ionio puede suponer, esta relacionado ion operaciones ion i'jdtMtiis de 
caracteres v l ipogr.il ia on general F.l texto puedo sor tratado t omo uno entidad 
gráfica m.is. siendo posible* su uso on un lion/o visible*, oomo puede sor un for¬ 
mulario, on 1111.1 imagen ooull.i o on un¿i superficie do impresión. 

I n System . Drawing . Text tan solo encontramos las 1 lasos necesarias pa 1 a 
determinar los tipos do letra que hav en el sistema \ sus atributos, va que los 
métodos para trabajar con texto lo mían parte del grupo de elementos básicos 
descrito con anterioridad, en el Sys tem. Drawing. 


Primera aproximación 

Saber qué ámbitos oslan relacionados ron C.DI- v mas o monos cual es su 
contenido no> permito tenor una noción general de a donde debemos recurrir 
on caila caso. Veamos ahora, en la pra< tica, como usar algunos do los ciernen 
tos mencionados utilizando el lcngua|i V isual Basic -NI. I Por simplicidad en 
principio dibujaremos directamente sobro el arca cliente do un iornuilano Win¬ 
dows aunque, como veremos después, existen otras posibles superficies. I es 
puntos siguientes describen, paso a paso, el proceso para dibu|<ir algunas enti 
dados simples sobre un Formulario vacio. C on ello aprenderemos a preparar 
algunos elementos básicos, como el pincel o la brocha, usándolos sobre una su 
perlu io de dibujo. 

C uando va a utilizarse como superficie de dibujo el formulario de una aplica 
1 ion, sin 11 sai ningún componente especifico, el lugar adecuado para insertar el 
codigo de dibujo suele ser un método asociado al evento Paint del formulario 

Inicie una nueva aplicación Windows, acceda al modulo de í ndigo asociado 
al formulario, pulsando el correspondiente botón del Explorador de soluciones 
v, a continuación, despliegue la lisia que hav en la parte superior izquierda del 
editor eligiendo el elemento (Eventos de clase base) Al hacerlo, en la lista de 
la derecha aparecerán todos los eventos de la clase base de nuestro formulario, 
es decir, de la clase Forra. Seleccionando el evento Paint generaremos un mé¬ 
todo con el siguiente encabezado: 

Prívate Sub l-‘orm 1 _Pa i n t ( By Val sender As Object. 

ByVal e As Sy st em. Windows . forma . Pai n tEven tArqs ) 

Batidles MyBase . Pa m t 

Tal v como se iiulii a al Final de la cabecera, con la palabra clave Handles, 
este método será ejecutado cuando se produzca el evento Paint de la dase ba¬ 
se, representada por MyBase. I slo significa que el código que incluyamos aquí 
se ejecutará rada vez que sea necesario redibujar el interior del Formulario. 

t'l segundo parámetro, una variable de la dase Pa intEventArgs, es el que 
mas nos interesa en este caso. Su propiedad Graphics nos Facilita la superficie 



de dibujo, un objeto de la clase Graphics nieneionada anteriormente. En la pro¬ 
piedad ClipRectangle. una estructura Rectangle, se indica el área de dibu¬ 
lo a la que debemos ceñirnos. 

Usando la propiedad Graphics del parámetro e, por tanto, tenemos acce¬ 
so a la superficie de dibujo y podríamos usar los métodos de esa clase para di¬ 
bujar cualquier entidad básica. 

Preparación de un pincel 

Para dibujar prácticamente cualquier entidad, incluso la mas simple, antes 
necesitaremos crear un pincel o lápiz, definiendo las propiedades que tendrá 
Sería la acción equivalente, si dibujásemos a mano, a buscar y coger el lápiz ade¬ 
cuado para lo que queremos pintar En CDI+ un lápiz es un objeto de la clase 
Pen, objeto que crearíamos como cualquier otro. 

Eos distintos constructores de que dispone la clase Pen permiten crear el 
lápiz, especificando su color, el grueso o incluso una brocha. Gracias a la tecno¬ 
logía hilellisnw es tácil saber que parámetros necesitamos e, incluso, seleccio¬ 
narlos directamente de una lista I n la figura 13.2 puede ver cómo una etiqueta 
emergente nos indica que debemos tadlitar un color para el lápiz, mientras 
que una lista emergente, aparecida al introducir la palabra Color seguida de 
un punto, nos ofrece una enumeración de los colores disponibles. 



Figura 13.2. Composición de la sentencia para crear un lápiz 


Suponiendo que deseemos crear un pincel de color azul celeste y de cinco 
puntos de grosor, podríamos usar la sentencia siguiente para obtenerlo en la 
variable Pincel 

Dim Pincel As Per» New Pen ( Co Lor . Aqua , 5) 

Dibujo de entidades simples 

Disponiendo va del lápiz., podríamos usar algunos de los métodos de la i la 
so Graphics para dibujar en la superficie, en este caso el formulario, cutida 
des sencillas como lineas, rectángulos o arcos El nombre de lodos estos métodos 
comienza con el prolijo Draw, por lo que le sera fácil encontrarlos en la lista de 










métodos (véase figura J3.3). Al introducir el nombre de cualquier método y 
abrir paréntesis obtendrá una ayuda sobre los parámetros que debe facilitar. 


de la clase Graphics 

Suponiendo que hemos dado los pasos anteriores, encontrándonos en la ven¬ 
tana de código con el método correspondiente al evento Paint abierto, po¬ 
dríamos utilizar el código siguiente para trazar algunas entidades sencillas y 
obtener el resultado que puede verse en la figura 13.4. Observe cómo se utiliza 
la misma variable Pincel para modificar las características del objeto v dibu¬ 
jar cada entidad en un color diferente. 

Private Sub Forml_Paint( ByVal sender As Object, 

ByVal e As System.Windows.Forma.PaintEventArgs) 

Handles MyBase. Paint 
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Figura 13.3. Lista de métodos de dibujo 


Dim Pincel As Pen » New Pen{Co1or.Aqua, 5) 

e.Graphics.DrawRectangle(Pincel, 10,10, 100, 100) 

Pincel.Color * Color.DarkCyan 
' y dibujamos un arco 

e.Graphics.DrawArc(Pincel,100,100,50,50,0,180) 

Pincel.Color * Color.Blue 
Pincel.Width * 8 

i tf i.i , ./ 

e.Graphics.DrawLine(Pincel,10,10,110,110) 

End Sub 

Relleno de áreas 

Los métodos que tienen el prefijo Draw siempre trazan contornos, usando 
para ello los atributos del lápiz que se les entrega como primer parámetro. Al¬ 
gunos de ellos, como DrawRectangle ( ) r DrawPolygon( ) o DrawClosed- 
Curve ( ) cuentan con métodos complementarios en los que se cambia el prefijo 
Draw por Fill. Algunos de dichos métodos son Fi URec tangle ( ). Fill- 
Polygon() y FillClosedCurve( ). 






Figura 13.4. Aspecto del formulario con las tres entidades gráficas 

Fstos métodos no dibujan un contorno, sino que rellenan la figura especifi¬ 
cada usando una cierta brocha. La brocha es un objeto, do la clase Brush. que 
se entrega como primer parámetro a estos métodos. 

Existen una serie de brochas predefinidas accesibles mediante las propieda¬ 
des de la clase Brushes, todas ellas de solo lectura. Se caracterizan por ser 
brochas sólidas de colores estándar, de tal manera que podemos usarlas sin ne 
cesidad de crear un objeto de la clase Brush v establecer sus propiedades. 


Nota 

En realidad la clase Brush es abstracta y. por tanto, no podemos crear di¬ 
rectamente objetos con ella. Existen, no obstante, una serie de clases deri¬ 
vadas mediante las cuales, como veremos luego, es posible crear brochas 
más complejas. 


Usando el código del ejemplo anterior como base, ponga delante de la lia 
mada al método DrawRectangle ( ) la sentencia siguiente: 

e.Graphics.FiIlRectangle(Brushes.Gold, 10, 10, 100, 100) 

I o que hacemos es rellenar el mismo rectángulo de color oro, trazando des¬ 
pués su contorno, de color azul celeste, con el método DrawRectangle( ). Al 
ejecutar el programa vera la diferencia. 


Añadimos un texto 

Aunque en capítulos previos hemos visto como incluir títulos, un texto 
cualquiera, en un formulario utilizando el control Label, lo cierto es que esta 
no siempre será la mejor opción, especialmente si es mucho texlo \ con diferen¬ 
tes atributos. 1 las que tener en cuenta que al usar un control Label se asignan 
una serie de recursos intrínsecos por su naturaleza de componentes visual, re¬ 
cursos que no son necesarios para insertar un texto en la superficie de dibujo 
del formulario usando el método DrawString( ). 





Antes de poder eseribir el lexlo, no obstante, tendremos que crear un objelo 
ile la clase Font: estableciendo los atributos que se utilizarán a la hora de escri¬ 
birlo. Al igual que ocurre con otros objetos, la clase Font dispone de múltiples 
constructores Utilizando uno de ellos podemos indicar el nombre del tipo de 
letra, su tamaño en puntos v el estilo: negrita, cursiva, subrayada, etc. 

I os parámetros para insertar el texto, llamando al método DrawString( ), 
serán cinco: la cadena di* texto a escribir, el objeto Font con los atributos, un 
objeto Brush con la brocha para pintar el texto v dos enteros indicando las coor¬ 
denadas donde so comenzara a dibujar. 

Sirviéndonos una vez mas del ejemplo anterior i orno base, añada las sentón 
cías siguientes al final v ejecútelo do nuevo. H aspecto será similar al de la fi¬ 
gura 1 US 1 n este caso el texto tiene un color uniforme porque asi os la brocha 
seleccionada pero, en la práctica, el texto podría haberse dibujado con un cier¬ 
to patrón, degradado de color o inclusa mapa de bits 


Dim TipoLetra As Font New Font( "Couner New", 14, 
FonLSt.y 1 * . ITndet* iine Or FontSty 1 e. Bo 1 d > 

e .Graphics . OrawStr i'nq ( "GDI + y Visual Basic.NET", 

TipoLetra, Brushes.B1ne, 10, ?00) 


VForml 


QDI+ y Visual Basic .NET 


Figura 13.5. Aspecto del formulario con el texto 

I n estos cuatro puntos ha visto como crear un gráfico en un formulario con 
gran simplicidad, si bien hemos conocido tan solo tinos chúñenlos mínimos 
Vamos a centrarnos ahora en el estudio de las características de algunos de es¬ 
tos elementos. 




Elementos básicos 

Ahora que sabemos básicamente tomo dibujar sobre la superficie de un for¬ 
mulario, \ podemos usároste conocimiento para ir componiendo nuestros ejem¬ 
plos, vamos a analizar con mayor detalle los elementos indispensables que 
deberemos utilizar a la hora de elaborar gráficos. Algunos de ellos, como por 




ejemplo el I«í pi/ \ el íipo de letra. los hemos conocido brevemente en los pun¬ 
ios prev ios. 

forman parte de este grupo de elementos básicos todos los atributos gue 
pueden a tecla r a las entidades gráficas en el momento de dibu ¡.irlas- i oorden.i 
das, color, tipo de tra/o del contorno v trama de relleno o estilo tipográfico al 
escribir un texto C orno en el ejemplo anterior, seguiremos utilizando el e\ ento 
Paint del tnrmulario v los métodos de la clase Graphics para dibujar. 

Coloree 


lodos las entidades gráficas, desde una linea hasta un texto, se dibujan en 
la siipertic ie utilizando un c ierto color o combina*. ion de i olores. I sta inturma 
ción. además, es íundamental para la mávoria de las composuiones gráficas. 
I os colores se representan en I.DI + mediante la estructura Color, definida en 
el ámbito System.Drawing fl color es almacenado internamente en dicha 
estructura, como tres valores separados, intensidad de verde, rojo v azul, l am 
bien existe un componente, conocido como (ilf/ltn, el cual determina el nivel de 
transparem la I os cuatro componentes son de tipo Byte. es decir, estarán com 
prendidos entre 11 v l 7 sto nos permite trabajar con algo mas de dieciséis 
millones de colores, lo gm* se conocí* habitualmenle como tvloi rea/ 

A la hora de detinii un color podemos utilizar disi ¡nías lee nicas, siendo una 
de ellas el uso de los componentes rojo, verde v azul Con este lin se utiliza el 
método estático FromArgb( ) con gue cuenta la estructura Color I visten di 
lerentes versiones de este método aceptando distintos parámetros, según nos 
interese tac ililar ademas el componente rtlpJm o no. 

Para v er la flexibilidad gue nos da el método FromArgb( ) en la composi 
cion de i olores vamos a serv irnos de un pegueño ejemplo, un lormulariu Y\ m 
do\vs gue, de manera interactiva, nos permita crear el color gue nos interese* 
Insertaremos en di» ho formulario cual ro controles TrackBar c on cual ro Labe 1 
encima, como se aprecia en la figura I Té Tenemos gue modificar los valores 
siguientes de los TrackBar 

• Oriental ion I siablece la orientación del control gtie por delecto es 
horizontal. I a cambiaremos a Vertical. 

• Máximum Un control TrackBar representa gráficamente un valor, el 
indicado por su cursor, gue eslara comprendido entre los limites indita- 
dos por las propiedades Mínimum v Máximum. I a primera tiene por de¬ 
lecto el valor 0, que es »•! gue nos interesa* pero la segunda tenemos gue 
modificarla asignándole* el v alor 255. 

• TickStyle Por defecto estos controles muestran unas marcas gue sir¬ 
ven como guia. I n este caso no nos interesan y. por ello, asignaremos el 
valor Norte a esta propiedad para desactivarlas 

finalmente asignaremos un nombre diferente a cada TrackBar. modili 
cando su propiedad Ñame, v estableceremos la propiedad Text de los cuatro 
Label gue nos sirven como títulos 
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Cdcia ve/ que alteremos la posición del cursor de un TrackBar se generara 
el evento Val ueChanged, evento que aprovecharemos para llamar al método 
Invalidate{ ) del formulario, liste invalida el contenido actual y luer/a la 
generación del evento Paint, actualizando asi la composición grálica que va¬ 
mos .i incluir, lista se compondrá de un circulo relleno de color negro, más o 
menos en el centro horizontal del formulario, sobre el que dibujaremos un rec¬ 
tángulo relleno de un color creado a partir de los valores establecidos en los 
TrackBar. ti I código necesario es el siguiente: 


Prívate Sub LbRojo_Va]ueChanged( 

ByVal sender As Object, ByVal e As System.EventArgs) 
Handles tbRojo.Va 1ueChanged, LbVerde.Va 1ueChanged, 
tbAzul.ValueChanqed, tbAlpha.Va1ueChanged 

Inva1 ida te( ) 

End Sub 


Prívate Sub Form1_Paint{ByVa1 sender As Object, 

ByVal e As Sys tem . W i ndows . Forma . Pa i nt. Event Args ) 

Handles MyBase.Paint 

Dira Brocha As New So 1 idBrush{Color.Black) 


e.Graphíes.Fi11Eilipse{Brocha, 60, 160, ISO, ISO) 




Brocha.Color * C'o I or . FromAi gb ( *. bAl pha . Va i ue, tbFojo.Va 1ue, 
tbVerde.Valué, LbAzul.Va Iue) 

«.Graphics.Fi1iRectangle(Brocha, 60, 160, ISO, ISO) 

End Sub 

End Class 

Observe como entrevimos a FromArgb( ) los valores ai tu.lies para el rompo 
nenie tilf'lm \ los Iros componentes ile color. Al ejecutar el programa en pi im i 
pió no verá mas que el circ ulo nr^ro, a posar Je que niodil¡que los componentes 
docoloi. I eiiiir.i que alterar el componente nlf>hn va que, di sermn mímenle < e 
i o, l.i brocha obtenida es totalmente transparente \ por ello, el rectángulo no 
llega a verse. 

FromArgb( ) no represenl.i el único método para obtener un merlo coloi 
también tenemos .i nueslr«i disposición los métodos I-'romKnownCoior ( ) \ 
Fi omNamef ) Iprimer.i obtiene un color de la ennmer.K ion KnownColoi 
que pasan por ser colores bien conoi idos. Dicha emimerai ion c ont lene dec en.is 
de constantes relendas a colores I a segunda toma como parámetro una cade¬ 
na i nn el nombre de un color, retornando una estructura Color que en su pro¬ 
piedad Ñame llene du lio nombre 

Por último tenemos la alternativa de utilizar las decenas de propiedades 
compartidas con las cjue cuenta la estructura Color, representando cada una 
de ellas un color determinado. Asi, pódennos usar Color-B lúe en lugar di* 
Color . FromArgb (0,0,255 ) para obtener el mismo i olor, v de forma analo 
ga Color. Beige, Color. Fuchs ia o Color .Magenta sin necesidad de co¬ 
noi er los componentes Rc.B di* dichos colmes. 
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Figura 13.7. Dependiendo del componente atpha el rectángulo será mas 
o menos transparente y permitirá ver el circulo que hay deba/o 




Nota 

En el ámbito System . Draw ing existe una clase, llamada ColorTrans- 
lator, que cuenta con diversos métodos compartidos que facilitan la con- 




versión de colores cuando se trabaja no sólo con GDI r sino también con 
HTML o funciones del API de Windows. Dichos métodos son autodescrip- 
1 tivos: FroraHtml ( ), ToHt-.ml ( ), FromWin32 ( ) . ToWin32 ( ). FromOlef ) 
y ToOle{). 


Puntos y coordenadas 

I as entidades pláticas so sitúan, on ol momento de dibujarse, en una cierta 
posición do un plano bidimonsion.il La mayoría do ollas precisan dos puntos: 
el de partida, donde so encontrara el extremo do la linea o una do las esquinas 
del rectángulo, v el de fin, que sera el extremo opuesto o lili de la linea, o bien 
l.i esquina opuesta del rectángulo 

Como pudo apreciar on el primor ejemplo de este capitulo, la mayoría de 
los métodos existentes en la clase Graphics aceptan como parametros indi¬ 
viduales las coordenadas en las que se dibujará la entidad gráfica. I sos méto¬ 
dos. no obstante, cuentan con versiones sobrecargadas que aieplan también un 
Rectangle como parámetro, o dos Point. C omo sabe, estas son estructuras 
que representan las coordenadas de un área o la posición de un punto. listas 
estructuras disponen de métodos como Offset ( ), Inflate ( ) vCeiling( ) 
que tai tillan diversas operaciones con los puntos, como el desplazamiento, v 
las arcas, incrementando la superficie o reduciéndola. 

C ada ve/ que dibujamos una entidad, facilitando para ello unas coordena 
das, éstas su tren una serie de transformaciones, I a aplicación utiliza un sistr 
ma de coordenadas conocido t omo worhi, persotiali/able en origen, orientación 
v unidad de medida, I sle sistema de coordenadas, el del mundo de la propia 
aplicación, es transformado primero al sistema de coordenadas de la pagina 
imaginaria en la cual va a dibujarse v. finalmente, al sistema de coordenadas del 
dispositivo final, podiendo este ser la pantalla, la impresora u otro similar 

Por delecto el sistema de coordenadas lógicas de nuestra aplicación, el cono¬ 
cido como u'orltt, usa el punto de pantalla como unidad de medida v, además, 
coincide en el origen y orientación del sistema de coordenadas de una ventana. 
Por eso la esquina superior izquierda es el origen de coordenadas que, en sen 
lido positivo, avanzan hacia la clerecha v abajo. 

I s posible establecer el origen de coordenadas en cualquier otro punto del 
plano, utilizando para ello el método Transí a teTransform( ) de la i lase 
Gr aphics I -de toma como parámetio dos números decimales induando el 
desplazamiento del origen en el eje X v el eje X.ll siguiente fragmento de có¬ 
digo, por ejemplo, establece el origen de coordenadas en el centro del formula 
rio, de tal lorma que las coordenadas a la izquierda de ese centro serán negat ivas 
y Lis que estén a la derecha positivas, ocurriendo exactamente igual en el eje 
vertical. I I resultado puede verlo en la ligura I TN 


e.Graphics.T ransíateTransfoimí 

Me.C1ientSi ze .Width / , Me. Cl i en tS i ze . He iqht / 7 .) 



e.Gi ¿ipti irs.Fi 1 iRectangief BrUfihes.Aqua, O, O, 100, 100) 


e .Graphics . Fi L J Rect.anq I e ( Brushes . Bl ack , -10D, -100, 10 n, 100» 



Figura 13.8. El origen de coordenadas se encuentra en el centro 
del area de dibujo 


I «i unidad di* medida usada para dibujar, ijue por deleito es el/uwf o punto 
de pantalla, también es un parámetro modiíuable Para seleiemn.ir otra um 
d.id tan solo tenemos ijue modificar el valor de la propiedad PageUnit de 
Graphics, asignando uno de los valores de la enumerar'ion GraphicsUni L. 
Presta lorma podremos trabajar en milímetros, pulgadas, punios de impreso 
ra, puntos de doiumenlo. rU Usando una unidad de medida estándar, romo 
puede ser el milímetro, nosotros indicaremos el tamaño real que deseamos que 
tengan las entidades. 

I a transformación de ese sistema de i oordenadas al utilizado linalmente en 
el dispositivo se encargara de calcular los puntos necesarios que por ejemplo 
serian distintos en la pantalla que en la impresora puesto que el numero de 
puntos por pulgada, o DPI, de una impresora es bastante superior al de una 
pantalla. 


Nota 

Podemos conocer el número de puntos por pulgada del objeto Graphics 
sobre el que estamos trabajando consultando las propiedades sólo de lec¬ 
tura Dpix y Dpi Y. La primera facilita la densidad de puntos horizontal y la 
segunda el mismo dato en vertical. 


Por ultimo mencionar la propiedad PageScale, que almacena un valor me 
di.míe el que se establece el tactor de escalado a la hora de convertir Lis mor 
llenadas de pagina al dispositivo tinal. 

I I \ alor iim ¡al os I. de tal manera que, en la práctu a, no se aumenta ni dis 
mi Ulive la propon ion de las entidades Asignando un valor superior verá que 
las .entidades crecen, mientras que cualquier valor interiora uno red mira sus 
dimensiones. 



Brochas 


Otro de los elementos usados habitualmenie al dibujar, principalmente al 
rellenar superficies, es la brocha. Antes so indicaba que no era posible crear un 
objeto de la clase Brush dado que es una clase abstracta, definida a propósito 
para servir como base de otras v no para crear objetos directamente a partir de 
ella Las clases derivadas de ésta son cinco: 

• SolidBrush - F.s la brocha sólida de un determinado color. I I construc¬ 
tor acepta como único parámetro el color, atributo que podemos modifi¬ 
car mediante la propiedad Color. 

• HatchBrush Brocha en la que se combina un determinado patrón, con 
un color de primer plano, v un color de fondo. Las propiedades Hatch- 
Style, ForegroundColor y BackgroundColor alojan estos paráme¬ 
tros. En la enumeración HatchStyle encontramos la lista de patrones 
posibles, en total mas de medio centenar. 

• LinearGradientBrush Se usa para componer brochas sólidas en las 
que se etectúan transiciones o fundidos entre colores. F.l fundido es lineal 
entre dos o más colores. La linea puede ser vertical, horizontal o diagonal 
en cualquier sentido. Un total de ocho constructores distintos permiten es¬ 
tablecer los parámetros de este tipo de brocha. 

• PathGradientBrush - F ; s una brocha similar a la anterior ya que se 
efectúan fundidos de colores solidos, si bien en este caso el tundido no es 
lineal sino que va desde el centro hacia los bordes de un cierto camino. 

• TextureBrush - Seguramente el tipo de brocha mas espectacular, ya 
que se utiliza una imagen como patrón repetitivo. La imagen, representa¬ 
da por un objeto Image, puede recuperarse de un archivo en disco o bien 
dibujarse. En cualquier caso, antes de ser utilizada como brocha pueden 
a p 1 i cá rse I e t ra ns fo r m aciones. 

La mejor forma de ver cómo se usan este tipo de brochas es sirviéndonos de 
un ejemplo basado, una vez más, en un formulario Windows. En el método co¬ 
rrespondiente al evento Paint incluimos el código mostrado a continuación. 

Prívate Sub Forml_Paint(ByVal Hender As Object, 

ByVal e As System.Windows.Forms.PaintEventArgs) _ 

Handles MyBase.Paint 

U* >i » 1 sM i ft-4 _»•..*«• . I ; ry-i . -* -'i* <J a 1 . * sí > I Cltff 

Dim Rectángulo As Rectangle = New _ 

Rectangle(10, 10, 100, 100) 

* j : • •* ft.i a• * h' M** >?*»> i’O]<•) í'v me, n+at i • i 4 *' 1 * 

Dim BrochaFundido As LinearGradientBrush » _ 

New LinearGradientBrush(Rectángulo, 

Color.Yellow. Color.Red, 

LinearGradientMode.BackwardDiagona1) 



Dim BrochaSimple As SolidBrush * _ 

New SolidBrush(Color.FromArgb(128, 0, 64)) 


.1 ¿I * * *íf f,1 f..4 • fl . .Ir- • 

Dim BrochaPatron As HatchBrush » _ 
New HatchBrush{HatchStyle.Plaid, 
Color.YellowGreen) 


uva #>ro» • - .• • • í . • . 

Dim Brochalraagen As TextureBrush « _ 
New TextureBrush( 

New Bitmap("C:\Windows \Nubes .bmp")) 


• 11| • ■ | O »* * if M | ^ •• ‘ • i r ^ /».’ '■( 

Dim Tipo As Font » _ 

New Font("Courier New", 24, FontStyle.BoLd) 

With e.Graphics » . . ^ 

’j .t- .tut* • I 'i, 1 - • « . J •/ 

« *■»*,» •• . -#f .r* Mi.-. :•** r.»).#» •> 

.Fi1lRecLangle(BrochaFundido, Rectángulo) 

’ y fíen t.*.*",»*- . •.* - » » 1 1* <*..•*» 

Rectángulo.Offset(100, 0) 

»•* I rt*l -J - ti- • *- '.«*'•*- 

.FillRectang1e(Brochas imple, Rectangulo) 

.I.*:..,., -rñ .» . ffi ‘V <(.« > 

Rectangulo.Offset(-100, 100) 

f.,i . ,4 d t* . *« . • «. •• 

.FillRectangle(BrochaPatron, Rectángulo) 

y ¿ « » fipttlm i i» o t/:/ • . *v 4.^ 4 '/» »»• • , , , 

Rectángulo.Offset(100 , 0) 

ím 4 *i t ¡ t * 

.FillRectangle(BrochaImagen, Rectángulo) 

!•>.».m*.4 itti.V r»V. b.l -ii t;Ju r*u. «i ••si t .Ai.* t 

' . - *•*>*- f.r - * r- 

.Drawstring("Brochas”, Tipo, 

Brochalmagen, 20, 210) 

.DrawString("Brochas", Tipo, 

BrochaFundido, 120, 230) 

End With 

End Sub 

La primera parte del código, previa a la sentencia with, se encarga de crear 
una variable Rectangle con las coordenadas y dimensiones del rectángulo a 
dibujar, varias brochas distintas y un tipo de letra. A continuación, en el blo¬ 
que With/End With, utilizamos el método FillRectangle ( ) para dibujar 
cuatro rectángulos usando las distintas brochas. Observe como se utiliza el mé¬ 
todo Offset de Rectangle para desplazar las coordenadas y no tener que 
ca 1 cuIar 1 as manualmente. 

Finalmente, usando el método DrawStringí ), se dibujan dos cadenas de 
texto con dos brochas distintas. Como se aprecia en la figura 13.9, una brocha 
no sirve sólo para rellenar entidades gráficas sino que, ademas, pueden apor¬ 
tar mucha vistosidad a un simple texto 



rochas 


Figura 13.9. Cuatro rectángulos rellenos con diferentes brochas 

Lápices 

A diferencia de lo que ocurre con las brochas, no existe una clase base y múl¬ 
tiples clases especificas de lápices. I a única clase disponible. Pen, es, sin embar¬ 
go, suficientemente flexible como para permitirla personalización muy detallada 
de este elemento básico. Aparte de diferentes colores y grosores, un lápiz pue¬ 
de tener trazo discontinuo, contar con elementos gráficos en los extremos tales 
Vomo flechas y, ademas, usar brochas para el trazo, de tal manera que se abre 
la posibilidad de usar lápices con patrones, imágenes o fundidos de color. 

Como ya sabe, el color y grosor de un lápiz se establece con las propiedades 
Color y Width. Si no deseamos un trazo continuo podemos modificar la pro¬ 
piedad DashStyle, consiguiendo asi una línea a trazos, punteada, con una 
combinación de trazos y puntos o, incluso, con un estilo definido a medida No 
tiene más que consultar los valores de la enumeración DashStyle para com¬ 
probar las posibilidades que existen. Mediante la propiedad DashCap del lá¬ 
piz también es posible definir si el extremo de cada trazo será plano, redondeado 
o triangular. Mediante las propiedades StartCap v EndCap se indican los ilu¬ 
minadores que aparecerán en los extremos de las líneas que dibujemos con es¬ 
te lápiz. L’n terminador no es más que un elemento gráfico como puede ser una 
flecha, un triángulo o un bolo. F.n este caso los valores posibles son los de la 
enumeración LineCap. 


Nota 

Algunos de los elementos a los que está haciéndose referencia se encuen¬ 
tran en el ámbito System. Drawing. Drawing2D, por lo que deberá aña¬ 
dir la correspondiente sentencia imports al inicio de su módulo de código 
para poder acceder a ellos. 


F.n lugar de utilizar un color sólido para efectuar los trazos, un lápiz puede 
servirse de una brocha previamente definida. De esta manera los trazos pue¬ 
den usar fundidos de colores, patrones de relleno o incluso imágenes. 






Como en rl caso anterior, para conocer en la práctica algunas de las posibi¬ 
lidades de los lapices vamos a servirnos de un ejemplo. Comenzaremos inser¬ 
tando en un formulario los elementos que pueden observarse en la figura I v 10 
dos diquelas de texto v dos controles ComboBox listos nos servirán como lis¬ 
ias desplegables en las que mostraremos todos los tipos de tra/o \ let minadores 
disponibles, facilitando la seleu ion de cualquiera de ellos. 

l o primero que tenemos que hacer, cuando se abra esta ventana, será recu¬ 
perar lodos los elementos de las enumeraciones DashStyle v LineCap para 
añadirlos a Lis lisias desplegables. Las enumeraciones son objetos derivados 
de la clase System. Enum. una clase en la que se implemenlan diversos méto¬ 
dos que, por lo tanto, heiedan todas las enumeraciones. Lino de esos métodos 
es GetValues( ), mediante el cual es posible obtener un arreglo con todos los 
valores que contiene la «•numeración. I sie arreglo se devuelve en lorma di* ob¬ 
jeto de la clase Array. que es la base de todos los arreglos. 

Una ve/ que ya tenernos el arreglo con los valores, recorrerlo no es ningún 
problema. Podemos, por ejemplo, usar la instrucción For Each \ recuperarlos 
individualmente. Lo que tenemos, sin embargo, son valores, dalos que pode¬ 
mos usar, llegado el caso, para electuar asignaciones a las propiedades Dash- 
Line, StartCap oEndCap. I o que necesitamos añadir a las listas desplegables, 
sin embargo, es una cadena de lexlo, no el valor de una enumeración. I n cual¬ 
quier momento, independientemente del tipo de valor sobre el que estemos tra¬ 
bajando. podemos recuperar una representación textual mediante el método 
ToStr ing( ) del que disponen prácticamente todos los objetos. 



Figura 13.10. Aspecto del formulario a diseñar 




Sabiendo esto, comenzaremos añadiendo a la clase del formulario los cua¬ 
tro miembros siguientes, l os dos primeros, de tipo Array, alojarán la lista de 
valores de las citadas enumeraciones, mientras que Terminado:* V Trazo 
mantendrán el valor elegido en cada momento. 


Private Terminadores As Array 

Private Trazos As Array 

Private Terminador As LineCap 

Private Trazo As DashStyle 

l os cuatro miembros son privados, de tal manera que sólo podrán utilizar¬ 
se desde la clase en que han sido declarados, es decir, desde el interior de Ion 
métodos de este l omuda rio. 

Acto seguido hacemos doble clic sobre el formulario, o bien seleccionamos 
el evento Load usando las listas que hav en la parte superior del editor de có¬ 
digo, e introducimos las sentencias mostradas a continuación. 


Private Sub frmLapicesLoad{ 

ByVaL sender As System.Object, 

ByVal e As System.EventArqs) Handles MyBase.Load 


Terminadores - Systen». Enum. Get Va 1 «es l GetType(I.ineCap ) ) 
Trazos = Syslem.Enum.GetVa1ues|GetType{DashStyiej) 


For Each Terminador In Terminadores 

► l é » ». !•••!»»« 

cbTerminadores . I tems . Add ( Terminador .ToStriiig ( ) ) 

Next 


For Each Trazo In Trazos 

cbTrazo. Items .Add {Trazo. ToStnng ( j ) 

Next 


cbTerminadores.SeiectedIndex * 0 
cbTrazo.SelectedIndex - 0 

End Sub 

Utilizamos el método GetValuesj ) de la clase Enum tíos veces, una para 
recuperar la lista de valores de la enumeración LineCap y otra para los de la 
enumeración DashStyle. Observe que lo que necesita dicho método como 
parámetro es un tipo de dato, no el identiticador de la enumeración en ni Por 
ello usamos la (unción GetType ( ) para recuperarlo. 

Después, en sendos bucles, añadimos a las listas desplegables los nombres 
de cada uno de los valores de las enumeraciones. Terminamos seleccionando 



el primer elemento de cada una de las listas, utilizando para ello la propiedad 
Selectedlndex 

El tipo de trazo v terminados almacenados en las variables Trazo y Ter- 
minador respectivamente, los usaremos en un método del formulario, asocia¬ 
do al evento Paint, para dibujar dos líneas en la ventana. Una de ellas, recta, 
estará basada en una brocha con un patrón de relleno, mientras que la otra uti¬ 
lizara un degradado de color. El código de ese método es el siguiente: 


Prívate Sub f rmI,apices_Paint ( 

ByVal serider As object, 

ByVal e As System.Windows.Forms.PaintEventArgs) 

Handles MyBase. Paint 

Dim BrochaPatron As HatchBrush * _ 

New Hat_chBrush( HatchSty1 e .Sphere, Color.Olive) 

.4 * i . i •• 

Dim Lápiz As Pen * New Pen(BrochaPatron, 8) 

- í»*' • 

Dim Rectángulo As Rectangle = New Rectang1e(250, 150, 100, 150) 


Dim BrochaFundido As LinearGradientBrush * 
New LinearGradientBrush ( Rectángulo, 

Color.Yellow, Color.Red, 
LinearGradientMode . BackwardDiagona l ) 


Lápiz.DashSty1e * Trazo 
Lápiz.StartCap = Terminados 
Lápiz. EndCap * Terminado!* 


e . Graphics . Drawl.ine ( Lápiz, 5 0 , 

150, 

200, 

250 

Lápiz.Brush = BrochaFundido 
e.Graphíes.DrawArc(Lápiz, 250, 

150, 

1 00, 

150 


End Sub 

Si ejecuta el programa efectivamente verá, como en la figura 13.11. la línea 
recta y el arco con los atributos que hemos establecido en el método anterior. 
Al seleccionar uno de los elementos de las listas que hay en la parte superior, sin 
embargo, no vemos cambio alguno, no se modifica ni el tipo de trazo ni los ele¬ 
mentos que deberían aparecer en los extremos. 

l o que ocurre es lógico puesto que no hemos asociado código alguno al 
evento que generan las listas desplegables cuando se cambia la selección ac¬ 
tual, concretamente el evento SelectedI ndexChanged. Seleccione en la lista 
de la izquierda uno de los controles ComboBox y en la de la derecha el mencio¬ 
nado evento, repitiendo la operación con el otro ComboBox. Los dos métodos 
deberían quedar asi: 



Prívate Sub cbTrazo_SelecledlndexChanged( 
ByVal sender As Object, 

ByVal e As System-EventArgs) 

Handles cbTrazo.SeleetedIndexChanged 

* . wv .aij . 

Trazo * Trazos(cbTrazo.Selectedlndex) 

Inva1idate() 

End Sub 


Prívate Sub cbTerminadores_SelectedlndexChanged( 

ByVal sender As Object, 

ByVal e As System.EventArgs) _ 

Handles cbTerminadores.SelectedíndexChanged 

Terminador * Tei nunadores(cbTerminadores .Select.edlndex ) 
Invalidate<) 

End Sub 



Figura 13.11. Aspecto de las líneas con los atributos por defecto 


Recuperamos el valor seleccionado en cada caso y, a continuación, llama¬ 
mos al método Invalídate ( ) del formulario. F.ste tuerza la generación del 
evento Paint y, por tanto, la actualización del contenido dibujado en la venta¬ 
na. Ahora sí, al seleccionar valores en las listas desplegables, podrá ver como 
las lineas cambian su trazo o terminadores. F.n la figura 13.12 puede ver como 
el Ira/o es discontinuo y en los extremos aparecen puntas de flecha. 


Nota 

Aunque en este ejemplo se ha utilizado un mismo tipo de terminador para 
ambos extremos de las líneas, como denota la existencia de las propieda- 
desstartCap y EndCap seria posible usar dos diferentes, uno para el pun¬ 
to de inicio y otro para el final. 








Figura 13.12. Las líneas Iras modificar el tipo de trazo y los terminadores 

Tipos de letra 

Ya hemos visto anteriormente cómo crear un objeto Font. para establecer 
las características de la tipografía, v cómo usarlo para introducir un texto en el 
lienzo de dibujo, l a clase Font dispone de diversos constructores que nos per 
míten especificar, en el momento de la creación del objeto, la familia del tipo 
de letra, su tamaño y el estilo. Dicha clase también dispone de propiedades que 
recuperan esos dalos y los facilitan a titulo informativo. Asi, podemos saber s¡ 
la tipografía representada por un determinado objeto Font está en cursiva, ne¬ 
grita o subrayada consultando sus propiedades Italic, Bold y Underline 
De manera análoga podemos recuperar el nombre de la tipografía: Ñame: su ta¬ 
maño: Size, o saber si tiene el estilo de letra lachada: StrikeOut 

Lo único que necesitamos saber, de cara a crear un objeto Font, es la lista 
de tipografías disponible en el contexto gráfico sobre el que trabajamos Nor¬ 
malmente utilizaremos un FontDialog, un cuadro de diálogo estándar, para 
permitir al usuario seleccionar no sólo la familia sino también el resto de atri¬ 
butos del texto. Podemos, no obstante, obtener una lista de tipos disponibles 
utilizando el miembro compartido Families de la clase FontFamily C ada 
uno de los elementos de la colección representada por Families es un objeto 
FontFamily que, entre oíros elementos, cuenta con una propiedad llamada 
Ñame que ahíja el nombre del tipo. 

Asumiendo que en un formulario hemos insertado un Lis t Box \ un La bel, 
sin modificar propiedad alguna, podríamos usar el código siguiente para mos¬ 
trar en la lista todos los tipos de letra disponibles v que, al seleccionarse cual¬ 
quiera de ellos, la etiqueta di' texto lo utilizase, hn la figura 13.11 puede ver el 
programa en luncionamicnto. 

Prívate Sub Forml_l,oad ( ByVal seiUler As Syst em . Ob^ecL, 

ByVal e As System.EventArgs) Handles MyBase.Load 









Din» Tipo As FontFamily 

• Mil •! •'*,]»•), ,íj. • • lltlfi 

For Each Tipo In FontFamiIy.Families 

• i UrJ f o-í ^ i 3 f • +* « 

ListBox 1.1tems.Add(Tipo.Ñame) 

Next 
End Sub 


• i Ai « 4 •• •• •»i i *»•* . .• ►;» <é 

Private Sub ListBoxl_SelectedIndexChanged( 

ByVal sender As System.Object, ByVal e As System.EventArgsj 
Handles ListBox 1.SelectedlndexChanged 

J» «i'HS ‘ * l fie* /*•* i**i t J t»l*J ( J 

Labeil.Font = New Font(ListBox1.Text t 20, FontStyle.Bold) 

, > ■ ni • *f 1^,4 . fi •rst»» • lír» * !•■• -ff | 

Labell.Text =» ListBox 1 .Text 

End Sub 




Figura 13.13. Lista con todos los tipos de letra disponibles 

Además de la clase Font, para definir la apariencia del texto, y el método 
DrawString( ) de la clase Graphics, para mostrarlo en la posición del plano 
que deseemos, lo único adicional que podemos necesitar será calcular el espa¬ 
cio necesario para un cierto texto. Para obtenerlo utilizaremos el método Mea- 
sureStr ing ( ) de Graphics facilitando dos parámetros: la cadena de caracteres 
y el objelo Font que usaremos para mostrarla. El resultado será una estructura 
Size con el ancho y alto necesarios. 

Manipulación de mapas de bits 

En un ejemplo previo liemos visto, muv brevemente, cómo recuperar una 
imagen de un archivo y cómo usarla para crear una brocha. La clase Bitmap, 
utilizada para abrir un archivo y leer la imagen, es una de las descendientes de 
Image, una clase genérica para el trabajo con imágenes. Otras clases doriv.id.is 


Tipos de letra 


Comic Sons MS 


w 

A 

Aná H*ck 


•WUamw 


8VfHjO» 


Vtxüu* 




BcoFmsri C*0 Sl»W 


íflrtfj i) C. C'i:. 


MnácSwMS 


[Courw Ifc* 

FrjrMn GtrthK Boc*. 




de ella son Meta file e Icón que. como puede suponer, están especializadas 
en el tratamiento de meta-archivos e iconos. Puesto que todas estas clases deri¬ 
van de Image, comparten un conjunto de miembros común. Lógicamente, ca¬ 
da clase derivada anorta elementos específicos. La clase Metafile. por ejemplo, 
dispone de un método llamado PlayRecord no existente en Bitmap y cu va ti 
nalidad es reproducir las instrucciones de un meta-archivo. 


Nota 

Los conocidos como meta-archivos son archivos gráficos que en lugar de 
contener información sobre los colores de cada punto de una imagen, como 
ocurre con los formatos bmp, gif o jpg, almacenan las órdenes necesa¬ 
rias para reproducir una determinada composición gráfica. 


Recuperación de una imagen 

I a clase Image dispone de diferentes métodos para recuperar una imagen, 
va sea desde un archivo, un flujo de datos o a travos del mancjadnr de un mapa 
de bits clásico de Windows, tstos métodos son FromFile( ), FromStream( ) 
v FromHbitmap< ), respectivamente. I.slos tres métodos son estáticos, o com¬ 
partidos, lo cual significa que podemos usarlos simplemente poniendo delante 
l* l nombre de la clase, sin crear pre\ ¡amente un objeto. Usando las clases deri¬ 
vadas tenemos otras alternativas. Tanto Bitmap como Metafile son clases 
que disponen de decenas de constructores públicos. Con ellos es posible crear 
el ob|eto recuperando la imagen de un archivo, creándola inicialmenle vacia, 
obteniéndola a partir de un recurso incorporado en el provecto, etc 

Si no queremos tan solo recuperar la imagen para mostrarla sino que. ade¬ 
mas, nos interesa usarla como .superficie sobre la que dibujar, deberemos crear 
un objeto de la clase Graphics usando el método compartido FromImage( ). 
I'.ste toma como único parámetro un objeto Image, o de una clase derivada, y 
retorna un objeto Graphics. Dicho objeto actúa como intermediario para po¬ 
der trabajar sobre la imagen, de tal manera que cualquier invocación a méto¬ 
dos de Graphics se reflejará en la imagen contenida en el objeto Image 

I a operación complementaria a la recuperac ión de una imagen, la salvaguar¬ 
da o escritura en un archivo, se efectúa mediante el método Save( ) I'.ste loma 
como único parámetro el nombre del archivo aunque, opcionalmente, también 
puede especificarse el lo mulo de archivo que se desea obtener. I a m bien existe 
la posibilidad de utilizar un flujo, un derivado de Stream, como destino de* la 
información. 

información y manipulación 

I ras recuperar la imanen, con cualouiera de los mecanismos citados antes, 
podemos obtener información diversa acerca de ella sirviéndonos de algunas 
propiedades do la clase Imaqe o la derivada que estemos útil izando. 





Las dimensiones de la imagen, un dato especialmente interesante si preten¬ 
demos mostrarla en una ventana, pueden recuperarse de las propiedades Width 
y Height, ancho y alto respectivamente. I amblen la propiedad Size contiene 
esta información, si bien en una estructura Size en lugar de como dos enteros 
independientes. Podemos asignar el contenido de la propiedad Size, por ejem¬ 
plo. a la propiedad AutoScrollMinSize de un formulario para ajustar las 
barras de desplazamiento en la ventana a fin de permitir la visuali/acion de 
imágenes de mayores dimensiones que las disponibles en dicha ventana. 

Otras propiedades interesantes, desde el punto de vista informativo, son 
VerticalResolut ion, HorizontalResolution, PixelFormat, Palette 
y Flags. Las dos primeras nos facilitan la resolución, expresada en puntos por 
pulgada, que tiene esta imagen tanto vertical como horizontalmente. Mediante 
PixelFormat sabremos cuántos bits necesita cada uno de los puntos de la 
imagen para almacenar su información de color, conociendo el número de co¬ 
lores. si existe un canal con información de transparencia, etc F.n caso de que 
la imagen utilice una paleta de color, la propiedad Palette permite tanto ob¬ 
tenerla como modificarla Por ultimo, en la propiedad Flags se almacenan in¬ 
dicadores de atributo adicionales. 

Como se ha indicado en el punto anterior, uno de los mecanismos que po¬ 
demos usar para modificar una imagen consiste en obtener un objeto Graphics 
a partir de ella La clase Tmage. no obstante, también cuenta con algún método 
capa/de efectuar alteraciones globales a la imagen Ll método RotateFlip ( ), 
por ejemplo, nos permite invertir la imagen en cualquiera de sus dos ejes, ver¬ 
tical u horizontal, o bien girarla en pasos de MI), 180 ó 270 grados. 

Visualización de las imágenes 

Tras crear un objeto Tmage, o derivado, mediante cualquiera de los méto¬ 
dos que ya conocemos, lo que tenemos es una imagen alojada en el interior de 
un objeto, pero dicho objeto no os visible Un objeto Image no es un formulario 
ni un componente con interfaz, de usuario, por lo que si deseamos poder ver la 
imagen, como es previsible, deberemos vulnirla desde el objeto Image en algún 
otro que si sea v isible. 

La clase Graphics, con la que hemos trabajado previamente, dispone de 
múltiples implementaciones de un método llamado Drawlmage( ). Con él po¬ 
demos mostrar una imagen en un objeto Graphics, por ejemplo asociado a la 
superficie de un formulario, respetando las dimensiones originales, alterándo¬ 
las para ajustarse a un ciorlo tamaño, situándola en una cierta posición, dibu¬ 
jando solo una porción de la imagen, eU 

Veamos cómo utilizar este método, v algunos de los descritos previamente 
de la clase Imaqe. con un sencillo ejemplo. Su linalidad será permitir la visiia- 
lizacion de cualquier gráfico que podamos recuperar de un archivo, rotarlo en 
pasos tte MU grados e incluir en él un titulo. C omen/aremos, como en casos an¬ 
teriores, i 11 i i ¡ando un nuevo provecto Visual Basic .NF.I basado en formularios 
Windows. Ll único elemento adicional que precisaremos, aparte del formula¬ 
rio, sera un componente OpenFileDialog 



Ya que vamos a estar manipulando una imagen de un formato desconocido 
a priori, añadiremos al inicio de la clase una variable privada de tipo Image: 


“4. .» oí H i —. : ., •»-« *r •- .nr-íT».*' 

Private Imagen As Image 

En principio esta variable estará vacía, por lo que poco podemos hacer con 
ella. Cuando se detecte un clic de ratón sobre el formulario, al generarse el even¬ 
to Click, usaremos el OpenFileDialog para mostrar un cuadro de diálogo 
que permita seleccionar un archivo gráfico. El nombre del archivo elegido 
estará en la propiedad FileName, dato que usamos tanto para establecer el ti 
tillo de la ventana como para crear un objeto Image guardando la referencia en 
la variable Imagen. 

Como se puede ver en el código de este método, mostrado a continuación, 
recuperamos las dimensiones de la imagen y las asignamos a la propiedad 
AutoScrollMinSize del formulario. De este modo aseguramos la existencia 
de unas barras de desplazamiento que faciliten el acceso a toda la imagen en 
caso de que esta tenga unas dimensiones superiores a las de la ventana. Final¬ 
mente, usamos el método Invalídate ( ) para forzar la actualización del con¬ 
tenido del formulario. 


Private Sub Forrol_C1ick(ByVal sender As Object, 

Byval e As System.EventArqs) Handles MyBase.Click 

If OpenFiieDialogl.ShowDialog{) - DialogResulL.OK Then 
Me.Text ~ OpenFileDia LogL .FileName 

Imagen 3 I raage .FromFi 1 e (Open Fí1 eDia log1.Fi leName) 

Me.AutoScrollMinSize = Imagen.Size 

Inva 1 idate| ) 

End I f 
End Sub 

I a imagen, alojada en el objeto Image, no sera visible por el simple hecho 
de que la variable Imagen pertenezca al formulario. Necesitamos, por tanto, di¬ 
bujarla en el interior del formulario y, para ello, utilizaremos el mismo sistema 
descrito en puntos previos: el evento Paint. Antes de llamar al método Draw- 
Image( ) facilitando como parámetro la variable Imagen, no obstante, hav 
que tener en cuenta que, en principio, ésta no contiene un dato válido. Dado 
que el evento Paint se producirá de inmediato, en cuanto la ventana se haga 
visible, eslo podría causar un tallo del programa Por ello comenzamos com 
probando si Imagen esta o no vacia. Si tiene una imagen, usamos el citado mé¬ 
todo para dibujarlaen la ventana, concretamente una versión de Drawlmage( ) 
que toma como segundo parámetro un punto a partir del cual dibujar Ese 
punto lo obtenemos de la propiedad AutoScrollPosition del formulario, 
que es actualizado a medida que el usuario usa las barras de desplazamiento 



Prívate Sub Forro 1 PainL (ByVal sendei As Object, 

ByVal e As System. Windows . Koxnts . Pa i ni Fvenf.Args } Handles MyBase . Pai nt 
íf Not (Imagen Is Nothing ) Then 

e . Graph i es . Drav/I maqe (Imagen, Me.AutoScio I I Position) 

End If 

End Sub 

A pesor de l<i existencia de las barras de desplazamiento, tras recuperar una 
imagen es posible que el usuario de este programa modifique* las dimensiones 
de la ventana, reduciéndolas o ampliándolas, para ver mejor la imagen. I n ese 
momento se producirá un evento Resize. en cuyo método asm i.ido nos limi 
taremos a llamar al método Invalídate ( ) asegurando asi que el contenido 
mostrado en cada momento en la ventana es el corréelo. 


Nota 

También podemos activar el estilo ResizeRedraw del formulario, utilizan¬ 
do el método Setstyle( ), si queremos que la invalidación se produzca 
automáticamente cuando se altere el tamaño de la ventana. 


r.n este momento el programa va seria capa/ de recuperar una imagen cual¬ 
quiera v mostrarla. Además, vamos a añadir en el método asociado . 1 1 evento 
KeyPress el código necesario para rotar la imagen v añadir un titulo. I I pri¬ 
mer proceso se asociará a la pulsación de la letra R v el segundo a la letra T: 


Prívate Sub Fotm1_KeyPres*( ByVal sender As Object, 

ByVal e As System.Windows.Forms.KeyPressEventAiqa) 

Handles MyBase .KeyPress 

If Char . Tdllppe* r ( e . KeyChar ) "R" Then 

Imagen.RotateFiip(RotateFiipType.Rotate90FlipNone) 

1 rival Idate ( ) 

End If 

If Char.ToUpper(e.KeyChar ) _ "T" Then 
Dim Orático As Graphics 
Dim ripoLelta As Font 

Grafico Graphics.FrojnImage<Imagen) 

TipoLe.tr a - New FonL( "Cour ier New", 24, 

ForttSt.yl e. Bol d Or Font.Sty le . 11aJ ic ) 

Gráfico.DrawString("GDI+ M , TipcLetra, Brushes.Blue, 10, 10) 

InvaJ idate <) 

End If 
End Sub 



Con este código ya tenemos completo nuestro programa de visuali/.ación de 
imágenes, no tiene más que ejecutarlo v recuperar cualquier imagen para com¬ 
probar su funcionamiento. En la figura 13.14 puede verlo trabajando sobre una 
imagen del Tech «lid 21)01 que tuvo lugar en Barcelona. 
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Figura 13.14. El programa mostrando una imagen tras añadir unos títulos 


Nota 

En el ámbito System. Drawinq. imaqinq encontrará, aparte de la clase 
Imaqe v la clase Bitmap. la clase Metaf ile. Con ella puede usar archi¬ 
vos que. en luaar de almacenar información sobre los puntos del gráfico o 
imagen, contienen los comandos, coordenadas y parámetros para generar 
la imagen. 


Caminos y regiones 

Aparto do múltiples métodos para ol dibujo do entidades que podríamos 
denominar <rm ¡Itns. como líneas, rectángulos, arcos v polígonos regulares o 
irregulares, en GD1+ podemos conseguir elementos más complejos utilizando 
caminos. Éstos pueden estar formados por lineas, rectas v curvas, o bien elemen¬ 
tos obtenidos a partir do los métodos antes mencionados. 








I os Láminos, una ve/ croados, pueden dibujarse, obteniéndose latí sólo el 
contorno, v también rellenarse. Para (‘líos st‘ utilizan los métodos DrawPath ( ) 
v FillPath{ ), respectivamente, asi como objetos que \a conocemos: pinceles 
\ brochas Al igual que muchos otros elementos, los caminos pueden ser tnins- 
lormados de diversas formas: rotados, escalados. tr«isladados. etc. 

I n cuanto a las regiones, también pueden estar formadas por entidades bá¬ 
sicas o, incluso, por caminos, si bien su finalidad, respecto a los caminos, es nut\ 
distinta. No sirven para ser dibujadas exclusivamente, sino que se utilizan pa¬ 
ra limitar el arca de dibujo, detectar la existencia de un punto en una determi¬ 
nada área o establecer la apariencia de una ventana no rectangular. 

I as regiones pueden combinarse entre si efectuando distintas operaciones, 
como la unión y la intersección, que dan una nueva región como resultado. 

Creación de un camino 

Un camino puede estar formado por una o más figuras, cada una de las cua¬ 
les, a su ve/, se forma um entidades simples lineas, arcos, rectángulos, etc I os 
métodos S tartFigure ( ) \ CloseFigure( ) marcan el inicios tin, respecti¬ 
vamente, de cada figura. Lntre las llamadas a estos métodos se incluirán otras 
para formar la figura. 

Las entidades básicas se añaden como parle del camino mediante los meto 
vlos AddLinef ). AddArc( ). AddRectangle ( ) y similares. Son equivalentes 
<i los métodos DrawLinef), DrawArc( ) \ DrawRectangle ( ) do la clase 
Graphics, con la dHerencia de que esas entidades no se dibujan sino que se 
añaden como parte de una figura. Una alternativa son los métodos AddCurve( ). 
AddClosedCurve { ) o AddBeziers( ). lodos ellos toman como parámetro 
un arreglo de estructuras Point indicando los puntos por los que debe pasar 
la curva. 

I'inali/ada la composición del camino, no tenemos mas que usar los citados 
métodos DrawPath( ) y FillPath( ) para dihupir su contorno o rellenar su 
interior sobre una superficie de dibujo I-I código siguiente, por ejemplo, aña 
dido al evento Paint de un formulario genera el resultado que puede verseen 
la figura 13.15. La primera figura se compone de un rectángulo v una elipse, 
mientras que la segunda es una curva abierta 


Dim Camino As GraphicsPath » New GraphicsPath ( ) 

Dim Punt-osí) As PoinL - ( 

New Point(50, 150), 

New Point(75, 200), 

New Point( 12 0 , 140 ) i 

With Camino 

.3taitFigure{) 

.AddRecLangle<New Rectangle(10, 10, 100, 100)) 


. AddArcI50, 75, 100 , 50 , 0, 359) 



.CloseFigure<) 
.StartFigure( ) 

.AddCurve(Puntos ) 

End With 


e. Graphics . F i .1. iPa t h { Bruahes . Aqua, Camino) 

. »t , o n * * * Jf •*. %» i 

e.Graph ics.DrawPath{Pens.Blue, Camino) 



Figura 13.15. Aspecto del camino con sus dos figuras 

Transformaciones 


Los caminos, al igual que otros elementos gráficos, pueden sufrir diversas 
transformaciones que alteran su posición en el espacio, orientación v dimen¬ 
siones. I slas transformaciones se ele» luán medíanle sumas y multiplicaciones 
de matrices, un terna relativamente complejo del cual, por suerte, no leñemos 
que preocuparnos va que la clase Matrix se encarga de ello. 

Una ve/, hemos creado un objeto de la clase Matrix básicamente podemos 
usar fres métodos distintos: Sea le ( ), Transíate ( ) y Rotate( ). Con el pri¬ 
mero se alteran las proporciones originales del objeto que va a transformarse, 
con el segundo se cambia su posición en la superficie de dibujo \ con el tercero, 
como puede suponer, se efectúa una rotación. 

I os parámetros son fáciles de comprender en todos los casos: tactores de 
escalado en el eje X e Y, desplazamiento en dichos ejes respecto a la posición 
original v grados que quiere rotarse. 

Tomando como base el código del e|emplo anterior, podríamos añadir las 
sentencias siguientes al final para dibujar el mismo camino pero con un 7!V\, de 
su tamaño original, algo mas a la derecha v abajo v rolado 4S . | | resultado se¬ 
ria el de la I ¡gura I Y Ift. 


Din» Matriz As Matrix New Mal rix( ) 

Matriü.Tiana1ale(200, SO) 

Matriz.Scale(0.75, 0.75) 




Matriz.Rotate(4 5 ) 


Cami no.Transformé Matriz ) 
e .Graph i es. Dr awPath< Pens.Red, Camina ) 



Figura 13.16. La ventana con el camino original y el transformado 

Creación de una región 

Las regiones son objetos de la clase Región v pueden ser croados a partir 
do rectángulos, objetos GraphicsPath v otras regiones. Lina vez croada, a la 
región pueden añadirse otras mediante el método Un ion ( ). También puede 
crearse la intersección con otras regiones. 

A diferencia de los caminos, las regiones no se dibujan en una superficie 
Son objetos que mantienen un aren, simple o compleja según los casos, que 
puede ser utilizada, por ejemplo, para limitar la zona en que puede dibujarse, 
comprobar si un punto existe en esa área o alterar la apariencia rectangular por 
deleclo de las ventanas. Este último caso es, sin duda, el mas llamativo. 

Podemos ver un ejemplo, muv sencillo, del uso de regiones añadiendo el có¬ 
digo siguiente en el método asociado al evento Load del formulario, consiguien¬ 
do una ventana circular con una pequeña área rectangular en la parte superior 
izquierda. Observe cómo se establece la apariencia del formulario mediante la 
propiedad Región. 

Din» Rectángulo As Rectangle = New Reclangle( 

0, 0, Me.Slze.Width, Me.Size.Height) 

Dim Camino As GraphicsPath - New GraphicsPath!) 

Camino.AddArc(Rec!angulo, 0, J59) 


Dim Area As Región = New Reqion(Camino) 



Rectarigu lo . Width = 100 
Rectanqulo.Height « 40 


Ar ea.Union í Rect anaulo) 

Me.Región » Area 

I I efecto, obviamente, puede ser mucho más impártanle utilizando una re¬ 
gión con forma más elaborada, por ejemplo a partir do una imagen. 



Figura 13.17. Aspecto de la ventana circular sobre el escritorio 
de Windows XP 


El componente PictureBox 

En todos los ejemplos de este capítulo hemos usado la superficie del formu¬ 
lario como lien/o para nuestros dibujos, utilizando siempre el evento Paint 
para mantener adecuadamente la composición, también hemos visto que pode¬ 
mos usar un objeto Bitmap con el ohjelívo do dibujar en memoria, sin necesi¬ 
dad de hacer visible la composición. I xislon olras alternativas v una de ellas es 
el uso del control PictureBox. 

Este componente, que podemos insertar visualmente en un formulario como 
c ualquier olro conlrol, dispone tic una propiedad, llamada Image, vi la que po¬ 
demos asignar cualquier imagen, lauto en ejecución como durante la tase de 
diseño. Mediante la propiedad SizeMode podemos ajustar la imagen a las di¬ 
mensiones del control »> viceversa, según interese, mientras que con Border- 
Sty le estableceremos el borde que deseamos aparezca alrededor. I n la ligura 
n.lS puede ver cómo se ha recuperado una imagen en lase de diseño, imagen 
que aparece en el interior del PictureBox. 

Si nos interesa dibujar en la superficie del P i etáreBox tenemos que ti sai el 
método Crea teGraph i es ( ). Este dev uelve un objeto de la clase Graphics, 





la misma que hemos utilizado repetidamente en los ejemplos previos. La única 
diferencia es que ese objeto ahora representa una superficie que está limitada a 
un control, no la superficie completa del formulario. 



Controtes • Microsoft Visual Baslc.NET [dfssftar] ■ Forvnt.vb [Diserto]* 


•ÜForml 


Figura 13.18. Un control PicturcBox con una imagen en su interior 


Gráficos en A5P.NET 


Generalmente estamos acostumbrados a que las interfaces nativas, las basa¬ 
das en formularios Windows, sean mas ricas, visualmente hablando, que las 
interfaces basadas en la Web. En la práctica, sin embargo, la mayoría de los ele¬ 
mentos que utilizamos en las primeras pueden también aplicarse a las segun¬ 
das, si bien con una metodología dilerente. 

Suponga que esta preparando una aplicación web y desea incluir imágenes 
en algunas paginas, o que necesita preparar un gradeo en respuesta a unos da¬ 
los introducidos por el cliente de la aplicación. Son casos en los que CDI+ pue¬ 
de ulili/arse conjuntamente con ASP.NET para alcanzar el objetivo deseado 
I os pasos básicos son los siguientes: 

• Preparación del gráfico en memoria, utilizando para ello un objeto de la 
clase Bitmap. 

• Usando el método FromImage( ) de la clase Graphics podremos dibu¬ 
jar sobre ese objeto sin necesidad de que este visible. 











• Guardar el gráfico en un flujo en memoria, a fin de inseriarlo en la res¬ 
puesta al diente, o bien escribirlo directamente en dicha respuesta usan¬ 
do la propiedad OutputStream de la clase HttpResponse. 

Una vez que hayamos obtenido el objeto Graphics podemos usar todos los 
mismos elementos, propiedades y métodos que hemos conocido a lo largo de 
todo el capítulo. F.l gráfico resultante podemos guardarlo en un archivo, con el 
método Save( ) de Bitmap, enlazándolo después con el documento HTML 
utilizando la habitual marca <img>. Esta es una posibilidad, la otra consiste en 
introducir directamente el gráfico en la respuesta enviada al diente, opción vá¬ 
lida sólo si en dicha respuesta no se incorpora más información. 

Para ver un sencillo ejemplo inicie un nuevo proyecto de aplicación ASP.NET 
y, tras hacer doble clic sobre la página, introduzca el código siguiente: 

' . di .< • ***»■ <t’> 

V un-» pt .í* «vio l i ‘ * 

Dim Imagen As New Bitmap(320, 200, _ 

Drawing.Imaging.PixelFormat.Format32bppRgb) 

• u/i ’TMph.et a pjitn -i* i 

Dim Gráfico As Graphics » Graphics.FromImage(Imagen) 

* !• n ! «* 1 .» O fl • ' Mtfrt ¡fl ’t («••' • M' v - • 

Gráfico.Fí1lRectangle(Brushes.Blue, Gráfico.ClipBounds) 

u •■* -: 'p*- r > • • • • 3 

Grafico.FillE11ipse(Brushes.Aqua, 10, 10, 300, 180) 

Graf ico. DrawSt r ing ( M GDI+ " , New Font ( "Arial , 20, 

FontStyle.Bold ),Brushes.Black, 140, 80 ) 

***IV I Jltt< M i I I %- l t *«•»!■•- 

Imagen.Save(Response.OutputStream, imageFormat.Jpeg ) 

Observe cómo al crear el objeto Bitmap indicamos las dimensiones del grá¬ 
fico y la profundidad de color. Para incluirlo en la respuesta enviada al cliente 
facilitamos al método Save( ) de Bitmap dos parámetros: la propiedad Out¬ 
putStream, un objeto Stream que representa el flujo de datos enviado como 
respuesta, y una constante indicando el formato en que se codificará la ima¬ 
gen. El resultado es el que puede verse en la figura 13.19 un gráfico como res¬ 
puesta a una solicitud. En la práctica el gráfico podría ser la representación de 
unos datos numéricos, una fotografía o cualquier otro mapa de bits. 


Funtoe clave 


• Eos servicios de GDI+ están repartidos por varios ámbitos, todos ellos 
parten de la raíz Sys tem. Drawing. 

• La superficie de dibujo, indistintamente de que el dispositivo final sea 
una ventana, un mapa de bits en memoria o una impresora, está represen¬ 
tada por la clase Graphics. 




Figura 13.19. Un gráfico GDI+ en una pagina ASP.NET 


• Tn l.i clase Graphics encontramos multitud de métodos que permiten 
dibujar todo tipo de entidades gráficas: DrawLine( ), DrawRec tangle ( ), 
FillEllipse( ), etc. 

• La gestión del color queda en manos de la estructura Color v sus pro¬ 
piedades \ métodos. Existen decenas de colores predefinidos en forma 
de constantes. 

• 1*1 lápiz o pincel con que se dibuja el contorno de las entidades gráficas 
está representado por la clase Pen. Por medio de sus propiedades pode¬ 
mos establecer el color, tipo de trazo, grosor, etc. 

• Para los rellenos de superficies se utiliza una brocha cuyos atributos se 
definen mediante un objeto de tipo Brush. Podemos usar brochas soli¬ 
das, con tramas, degradados de color e incluso imágenes. 

• I .as entidades se sitúan en el plano usando un sistema de coordenadas ló¬ 
gico en el que podemos alterar el origen, la unidad de medida y el escala¬ 
do. Dicho sistema es traducido al sistema final del dispositivo por («DI+. 

• Mediante las clases derivadas de Image se facilita la recuperación, manipu¬ 
lación en memoria v almacenamiento de imágenes, como pueden ser los 
mapas de hits v los mela-.irehi vos 

• Para la composición de entidades complejas podemos usar los caminos, 
objetos que se componen de entidades mas simples v que posteriormente 
pueden ser transformados antes de dibujarse en el Graphics. 






• Utilizando regiones podemos alterar la forma por defecto de una venta¬ 
na, asi como detectar la pulsación sobre áreas de un gráfico. 

• Id control PictureBox es un componente especializado en 1 «i \ isuali/a- 
ción de imágenes. Basta una asignación a su propiedad Image para mos¬ 
trar una imagen cualquiera, sin ningún paso adicional. 

• (iDIt también puede utilizarse para preparar gráficos en memoria con el 
objetivo de enviarlos a clientes de ASIMMPT. 


Resumen 


I ste capitulo ha introducido sólo algunas de Lis posibilidades gráficas de 
( ÍDI+. un modelo mucho mas simple y flexible de trabajo con gradeos que el 
1 1asico (.1)1 o las sentencias originales que Visual Basic heredo de las \ ci siones 
ancestrales de BASIC. Utilizando los lápices, brochas v los métodos tic la clase 
Graphics va tenemos más posibilidades que en versiones prev ias de Visual 
Basic. A esto se añaden las capacidades para la manipulación de imágenes, los 
caminos v regiones o las diversas translormariones 

Aunque en casi todos los ejemplos hemos usado el evenlo Paint para dibu¬ 
jar sobre la superlicie del formulario, lo dorio es que podemos dibujar directa¬ 
mente sobre un Bitmap, lo hemos visto al final, v, por ejemplo, conseguir 
electos de animación mediante la técnica cnnocida como i/obír ¡wfci. larnbien 
se pueden registrar las sentenciasen un meta-archiv o v, posteriormente, repro¬ 
ducirlo sobre la superficie de dibujo 

Por ultimo, también forman parte de C.l)h los servicios relativos a impre¬ 
sión. De ellos exclusivamente nos ocuparemos en el próximo capitulo. 
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Impresión 
de datoe 


La mayoría de las aplicaciones que desarrollemos procesarán información 
que, de alguna forma, será almacenada persistentemente, por regla general en 
bases de datos. 

bisa información, no obstante, lina vez procesada tendrá unos destinatarios 
que no deben, necesariamente, usar la misma aplicación. En estos casos surge 
la necesidad de publicar la información ya elaborada, usando para ello recur¬ 
sos como la impresión en papel o la publicación digital. 

En Visual Basic .NET podemos usar una serie de componentes que facilitan 
la salida de información por la impresora, así como la visualización previa de 
esa impresión. Será el tema central de este capítulo. 

El destino para esa información, en realidad, no tiene necesariamente que 
ser una impresora física, ya que en Windows podemos configurar como dispo¬ 
sitivo de salida un fax, un dispositivo virtual para generar documentos PDF o 
un archivo. 

Una alternativa al control directo de la impresión de los datos, aplicable si 
contamos con una de las ediciones superiores de Visual Studio .NET o bien he¬ 
mos adquirido por separado Crystal Reports.NET, consiste en usar esta conoci¬ 
da herramienta para diseñar los informes, imprimirlos y exportarlos en diversos 
formatos. 

Crystal Reports.NET se integra en el entorno de Visual Studio.NET apor¬ 
tando su propio diseñador v componentes que simplifican su uso. Trataremos 
el uso de esta herramienta en un capítulo posterior. 






Fases del proceeo de impresión 


Comencemos analizando los pasos mas básicos de* que consta el proceso do 
impresión en una aplicación Windows escrita con Visual Basic NFT Fste pro¬ 
ceso es siempre básicamente el mismo, si bien después podemos añadir oirás 
posibilidades como la configuración de página por parle del usuario o el ofre¬ 
cimiento de una visuali/.ación previa. 

bn el sistema siempre existe una impresora seleccionada como dispositivo 
de salida por detecto. En principio la usaremos como destino de nuestra infor¬ 
mación, aunque después veremos cómo facilitar la selección de una impresora 
v su configuración. Tendrá, por tanto, que conectar esa impresora por detecto 
para ver el resultado generado por los distintos ejemplos. 

Los datos a imprimir pueden, virtualmente, proceder de cualquier fuente: 
una base de datos, un archivo de texto, los elementos de un arreglo o, simple¬ 
mente, aparecer como constantes en el interior del programa. Por simplicidad, 
para centrarnos principalmente en las tareas de impresión, usaremos datos 
constantes. Éstos podran sustituirse, por ejemplo cuando aprenda a usar bases 
de datos, por información procedente de otras fuentes. 

Documento a imprimir 

I os elementos a los que se da salida por un dispositivo de impresión se de 
nominan documentos, estando representados por un componente PrintDocu- 
ment Encontrará este componente en el Cuadro de herramientas, en concreto 
al final de la pagina Windows Forms. Se trata de un componente no visual que 
a! ser insertado en un formulario aparece en la parle inferior del diseñador La 
única propiedad interesante que encontrará en la ventana Propiedades es Docu- 
mentName. Con ella se establece el nombre del documento, el nombre de cara 
al usuario que aparecerá, por ejemplo, en la ventana de la impresora. 

Para poner en marcha el proceso de impresión tan sólo es imprescindible un 
paso: la llamada al método Print( ) del componente PrintDocument . A par¬ 
tir de ese momento se desencadenará una secuencia de eventos que nos permi¬ 
tirán controlar el proceso v facilitar la información que debe imprimirse. Estos 
eventos son: 

• BeginPrint - Se produce una sola vez, inmediatamente después de lla¬ 
mar a Print ( ). Lis el lugar adecuado para preparar los datos que van a 
imprimirse a continuación, por ejemplo conectando con la base de dalos, 
abriendo el archivo del que van a obtenerse, etc. 

• Query PageSettings - Fste evento se genera una vez por cada página 
que va a imprimirse, concretamente justo antes de que se imprima dicha 
página F.I método que lo reciba contará con un parámetro, un objeto de 
la clase PageSettings, que puede usar para configurar la pagina Volve¬ 
remos sobre ellos posteriormente. 



• PrintPage - Al igual que el anterior, se genera una vez por cada página 
a imprimir. Es el único evento que debe controlarse obligatoriamente, ya 
que es el encargado de facilitar la información a imprimir e informar si 
hay más páginas pendientes. 

• EndPrint - Complementario a BeginPrint, se producé una vez ha fi¬ 
nalizado la impresión de la última página. Es, por tanto, el punto adecua¬ 
do para liberar recursos, cerrar conexiones abiertas, etc. 

En la práctica, asumiendo el caso más simple posible, incluiríamos un com¬ 
ponente PrintDocument en el formulario, llamaríamos a su método Print( ) 
desde algún punto del programa y nos serviríamos del evento PrintPage pa¬ 
ra preparar cada página. 

Superficie de impresión 

Cada vez que se produce el evento PrintPage, el componente PrintDo¬ 
cument facilita un parámetro de tipo PrintPageEventArgs. En él encontra¬ 
mos, por una parte, las dimensiones de la página sobre la que va a imprimirse, 
totales y aplicando los márgenes preestablecidos, así como un objetoGraphics 
sobre el que dibujaremos el contenido de la página. 

La impresión, por tanto, se hace sobre una superficie representada por un 
objeto Graphics que, básicamente, ya conocemos por haberlo usado en el ca¬ 
pitulo previo. Podemos usar el método DrawString( ) para imprimir el texto, 
controlando su apariencia mediante la clase Font. Igualmente, podemos im¬ 
primir gráficos utilizando los métodos de la clase Graphics. 

Debemos tener en cuenta el contenido de las propiedades PageBounds y 
MarginBounds. Ambas son estructuras Rectangle, la primera conteniendo 
las dimensiones de la página y la segunda con las coordenadas que quedan 
dentro de los márgenes, donde se supone que debemos imprimir. También po¬ 
demos usar la propiedad VisibleClipBounds de la clase Graphics para 
obtener el rectángulo visible del área de impresión. 

Antes de devolver el control, desde el método asociado al evento PrintPage, 
nuestro programa habrá completado la página con los datos a imprimir. Si 
queda más información para imprimir daremos el valor True a la propiedad 
HasMorePages del objeto PrintPageEventArgs que se recibe como pará¬ 
metro. Sólo con esto, ya podemos componer un documento con las páginas que 
sean necesarias. Normalmente necesitaremos controlar la posición vertical en 
la que imprimiremos, incrementándola según el texto o gráficos que vayan in¬ 
troduciéndose. Cuando esa posición esté cerca del final devolvemos el control. 


Nota 

Si va a imprimir sólo texto en la página, para calcular el número de lineas 
disponibles divida MarginBounds . Height entre la altura del texto, dato 
que puede obtener mediante el método GetHeight( ) de Font. 




Composición de un documento 

Tomando como baso los elementos vertidos en los puntos previos, veamos 
cómo compondríamos para imprimir un documento de relativa complejidad 
Bste estará formado por un titulo, un texto, una pequeña tabla de datos v un 
gráfico simple que los representa. Toda esta información, como va se ha dicho, 
podría recuperarse de un archivo o una base de datos pero, en nuestro caso, la 
obtendremos a partir de diversos arreglos. Al completar la impresión, obtendre¬ 
mos en el papel algo parecido a lo que se muestra en la figura 14.1. Si hay más 
texto, el gráfico, o incluso parte del texto junto con la tabla de datos, pasarían a 
tas páginas siguientes. 


Informe sobre uso de lenguajes 


Qwgiui «1 último sondeo electmlo por la pres¬ 
tigios» revista Hundo Bits. Visual Basic • ■ 
actualmente el lenguaje de programación mas 
utilizado a nival mundial, seguido do cerca - 
po* <:♦». 

Mas distantes quedan Java, Oelphi y languajes 
minoritarios como FORTRAN o COBOL. 

Este estudio se ha centrado en lós lenguajes 
considerador d« ‘propóait- general*, aquellos 
q«i» pueilan utilizarse pata deeatrnllnt tanto 
aplicaciones clasicas, basadas en interfaces 
de usuario gráficas con conexión a bases de 
datos, como componentes discretos, programa» 
de servidor web y librerías conteniendo ródi 
go pt«compilado listo par» reutilisar, por 
ejemplo en forma de controles ActiveX o com¬ 
ponentes JtvaBetn». 

Vinal Baair Ce-» Java Delphi Otros 

n% n* is» ot i*» 

// ti s» * 



Figura 14.1. Aspecto de la página una vez impresa 


Comenzaremos añadiendo al inicio de la definición de la clase, correspon¬ 
diente al formulario, una serie de arreglos con los datos a imprimir. Concreta¬ 
mente tendremos los siguientes miembros: 


• ..Mi i O tt»* i rn*>Utfiv 

Prívate Titulo As String = _ 

"Informe sobre uso de lenguajes” 













Privato Títulos () As String *■ { 

"Visual Basic", "C++", "Java", 
"Delphi", "Otros'*) 


Prívate Datos() As String - ( 

"32V, " 2 7 V , "15*", '* l 2 V , - 1 4 U > 


Prívate Puntosf,) As Single - { 

{0, i'¿ • 3.61, H2 * 3.6, 27 * 3.6), 
{(32 t 27) * 3.6, 15 * 3.6), 

{ (32 t 27 4- 1S) * 3.6, 12 * 3.6), 

{(32 ♦ 27 4 15 + 12) * 3.6, 14 * 3.6)) 


Private Relleno!) As HaLchStyle - { 

HatchStyle.BackwardDiaqonal, 

HatrchSty le.Cross , HatchSt y le . DashedHor-i zonta 1 , 
HatchSty le.LightDownwatdDiagona1 , 

HatchStyle.DottedDiamond) 


Private LineaTexto As Byte 


Private Texto)} As String * ( 

"Según ei último sondeo efectuado por la pres-", 

"tigiosa revista Mundo Bits, Visual Basic es", 

"actualmente el lenguaje de programación mas", 

"utilizado a nivel mundial, seguido de cerca 
"por C++.", 

"Mas distantes quedan .Java, Delphi y lengua "jes", 

"minoritarios como FORTRAN o COBOL.", 

"Este estudio se lia centrado en los lenguajes", 

"considerados de 'propósito general', aquellos", 

"que pueden utilizarse para desarrollar Lanto", 

"apiicaciones clasicas, basadas en interfaces", 

"de usuario gráficas con conexión a bases de", 

"datos, como componentes discretos, programas", 

"de servidor web y librerías conteniendo códi-", 

"go precompilado listo para ren tilizar, por", 

"ejemplo en forma de controles ActiveX o com-", 

"ponentes JavaBeans.") 

C opiando v pecando lincas podemos aumentar la cantidad de texto del in¬ 
forme, o bien reducirlo, con el fin de comprobar cómo se producen los saltos de 
una pagina a oirá gradas a la lógica que vamos a analizar de inmediato 

La variable LineaTexto es lundamenlal, ya que mediante ella sabremos si 
estamos iniciando el informe, que lineas se han impreso o si se ha finalizado 
con el texto. I I valor inicial de esta variable sera cero. Asumiendo que ha ini¬ 
ciado una nueva aplicación Windows, inserle en el formulario un componente 
Pr intDocument v un botón. I laga luego doble clic sobre este v llame al méto¬ 
do Print( ) del primero, de tal manera que la impresión si* inicie a demanda, 




cuando pulsemos ese botón, bl resto del código estará en el método Pr i ntPage 
del componente PrintDocument, código que vamos a estudiar ahora paso a 
paso. 

I o primero que tenemos en ese método son los tipos de letra, brocha y lápiz 
que vamos a utili/.ar para imprimir las distintas partes del texto y el gráfico, l a 
definición de estos elementos es la mostrada a continuación: 


Dim TipoTexto As Font = New Font("Courier New", 14, 

FontStyle.Reqular} 

Dim TipoTi tu lo As Font - New Font("Arial", 24, FontStyle.Bold) 
Dim TipoTitulosDatos As Font « New Font("Courier New", 12, 
FontStyle.Underline Or FontSty Le .Bo 1 d ) 

Dim TipoDatos As Font » New Font ("Cotir ier New", 10, 

FontStyle.Italie) 


Dim Brocha As Brush 

Dim tapiz As Pen *= New Pen (Color. Black, 3) 

Como puede ver, hay un tipo de letra para el titulo del informe, otro para el 
lextti general, un tercero para los títulos de los datos y un cuarto para los datos 
propiamente dichos. 

Fl evento PrintPage se generará una primera ve/., a) llamarse al método 
Print( ). cuando la variable LineaTexto tiene el valor U. Comprobamos este 
hecho, que nos indica que el informo está comen/ando a imprimirse, v lo apro¬ 
vechamos para escribir el titulo centrado en la parte superior de la página. I am¬ 
blen damos un valor inicial a la variable Pos Y, que iremos actualizando para 
saber en que posición de la página, vertiealmente hablando, debemos comen¬ 
zar a imprimir cada linea de texto. 

If LineaTexto - 0 Then 

PosV * e.MarginBounds.Y 

Dim Tamaño As SizoF = _ 

e.Graphics.MeasureStrinq(TituLo, TipoTi tul o) 


e.Graph les . DrawS t r i ng ( T i tillo, TipoTitulo, 
Brushes . Black , ( e. PaqeBourids . Widt h - 

Tamaño . Widt t») ! 2, PoaY) 


Pos Y Tamaño.He ight * 2 

End I i 

Para obtener el tamaño del recuadro necesario para imprimir el titulo usa¬ 
mos el método MeasureStr ing( ) de la i lase Graphics. Pesiando del ancho 
total de la pagina la anchura que ocupará el texto, y dividiendo el resultado en¬ 
tre dos, obtenemos el centro horizontal, punto en el que colocamos el titulo. Una 



ve/ que LineaTexto no tenga el valor (I el Ululo no volverá a imprimirse, es 
decir, Lin sólo aparecerá en la primera página. 

I o siguiente será comenzar a imprimir el lexlo del supuesto informe, texto 
que tenemos en un arreglo de cadenas. Para recorrerlo preparamos un índice v 
también calculamos el alio que tendrá cada linea de lexlo. 

Dim Indice As Byte 

Diin AlLoLinea As Integer = TipoText o. Ge i He i qh t: ( e . Graph íc b ) 

(. on el lin de imprimir las lineas de texto que correspondan usamos un bu¬ 
cle. ni índice de partida es el que indique LineaTexto, imcialmente cero, \ el 
final el correspondiente a la ultima linea de texto del arreglo. Realmente el bu 
de, como puede verse en el código siguiente, puede terminar antes en caso de 
que se llegue al final de la página. I n este caso conservamos el indice de la últi 
ni.i linea en LineaTexto, asignamos el valor True a la propiedad HasMore- 
Pages v luego abandonamos el método. Cuando el evento PrintPage vuelva 
a generarse LineaTexto va no sera cero, de tal manera que no se imprimirá e) 
titulo \ se entrará en el bucle de impresión de lineas partiendo con el ultimo ín¬ 
dice que se usó al abandonarlo 


For Indice = LineaTexto To Texto.CetUpperBound(0) 

e.Gidphíes.DrawSt ring(TexLo( Indice ) , TipoTexto, 
B rus lies.Black , e.MarginBounds.Left, PosY) 

PoaY +-« AlLoLinea 


If PosY + AlLoLinea >- e . MarginBounds . Bot tom Then 

LineaTexto * Indice 

PosY e.MargínBounds.Top 

e.HasMorePages * True 
Exit Sub 
End If 

Next 

1.1 proceso de salida v entrada en el bucle puede repetirse múltiples veces, 
dependiendo de la cantidad de líneas de lexlo que haya c*n el arreglo, comple¬ 
tando la impresión de múltiples páginas. Aunque es algo que en este caso no 
hemos hecho, podríamos usar un contador para saber en qué página estamos e 
imprimir ese dato como cabecera o pie. 

Nos queda imprimir la labia de dalos y dibujar el correspondiente gráfico 
sectorial, liste ocupara el espacio que quede libre entre dicha tabla v el final de 
la página, aunque manteniendo una proporción para aparecer siempre circu¬ 
lar. Comen/a remos, por tanto, comprobando si hay espacio suficiente en la pá¬ 
gina, provocando un nuevo salto en caso contrario. 



*U.t I 


LineaTexto = Texto.GetUpperBound(0)+1 
PosY ♦* AltoLinea * 2 


% i f. t » /•.< • «♦ <.!•••- 

If PosY + TipoTitulosDatos.GetHeight(e.Graphics) 

* 2 > e .MarginBounds.Bottom Then 

• i « .««- r * ,/ »"• 

PosY * e.MarginBounds.Top 

* • ni fl • *»t "• m» p *«7 ■-* i 

e.HasMorePages = True 

Exit Sub 1 » ni v 

End If 

Esta posible salida del método causará la generación de un nuevo evento 
PrintPage. En este caso ya no se imprimirá el titulo del informe y, gracias al 
valor que tiene LineaTexto se saltará sin ejecutar el bucle que imprime el tex¬ 
to. Se procederá a imprimir directamente la tabla de datos v el gráfico, un tra¬ 
bajo que hacemos con el código siguiente: 


Din PosX As Integer » e.MarginBounds.Left 
AltoLinea = TipoTituiosDatos.GetHeight(e.Graphics) 

.. • - -.•'i ' • 

For Indice » 0 To Títulos.GetUpperBound(0) 

e.Graphics.DrawString(Titulos(Tndice ), 

TipoTituiosDatos, Brushes.Black, PosX, PosY) 

e.Graphies.DrawString(Datos(Indice), 

TipoDatos, Brushes.Black, PosX, 

PosY + AltoLinea) 


Brocha = New HatchBrush{Reí leño(Indice), 
Color.Black, Color.White) 


e.Graphi es.Fi11Rectangle(Brocha, PosX, 

PobY f AltoLinea * 2, 20, 20) 

PosX e . Graph ics . MeasureSt ring ( 

Titulos(Tndice), TipoTitulosDatos).Width i 10 

Next 


PosY += AltoLinea * 2 ♦ 30 
PosX * e.MarginBounds.Left 



Diro A1 Lo As Single e.MarginBounds.He ight - PosY 

Dim Ancho As Single = e . Margi nBounds.WidLh 

vi i • k • ' h ' n » *ii f - ,. . 11 

If Alto > Ancho Then Alto * Ancho 
If Ancho > Alto Then Ancho = Alto 

vf.i ■»* t »J it a 

For índice * 0 To Datos. GetUpperBound (0 ) 

Brocha - New HatchBtush(Reiieno(Índice), 

Color.Black, Color.White) 


e.Graphics.FillPie{Brocha, PosX, PosY, Ancho, Alto, _ 

Puntos(Indice, 0), Puntos(Indice, 1)) 

( >I||| , • • v-.jl u.* I-té 

e.Graphics.DrawPie(Lápiz, PosX, PosY, Ancho, Alto, 

Puntos(Indice, 0), Puntos(Indice, 1)) 

Next 

Los porcentajes de cada lenguaje se colocan debajo de los títulos, formando 
asi la pequeña tabla resumen del informe. Bajo cada datóse dibuja un rectángu¬ 
lo con el tipo de relleno que tendrá el correspondiente sector en el gráfico de 
tarta, facilitando asi su identificación. Para dibujar los sectores utilizamos los 
métodos DrawPie ( ) y FillPie( ) con los mismos parámetros de coordena¬ 
das Éstas determinan el rectángulo, cuadrado en este caso, en que se incluirá 
el sector, mientras que los dos últimos parámetros determinan el punto de la 
circunferencia donde comenzara el arco y los grados de distancia hasta el pun¬ 
to final. Estos datos los tenemos precalculados en un arreglo que habíamos de¬ 
finido al principio. Dado que la suma de los porcentajes es 100 v la circunferencia 
360 grados, es fácil hallar cada punto sumando los valores y multiplicándolos 
por 360/100, es decir, 3.6. 

Para ejecutar el programa, y poder ver el resultado, deberá disponer de una 
impresora conectada al equipo. Pruebe a alterar la cantidad de texto del arre¬ 
glo Texto para provocar más o menos saltos de página y ver el resultado. 


Nota 

Si dispone de una impresora en color, en lugar de usar brochas con diferen¬ 
tes patrones de relleno, como se hace en este ejemplo, puede utilizar un 
color distinto para cada sector. 


Configuración de parámetros 


tái el ejemplo anterior se ha impreso un documento usando los parámetros 
de configuración predeterminados. Éstos fijan las dimensiones del papel, el 



dispositivo de salida y algunos aspectos más, como el número de copias, el or¬ 
den, etc. Visual Basic NEI cuenta con los cuadros de dialogo apropiados para 
permitir que el usuario establezca la mayoría de estos parámetros antes de rea¬ 
lizar la impresión, ajustando esta a sus preferencias. 

I ornando como base el ejemplo anterior, cuyo formulario dispone de un bo¬ 
tón que pone en marcha la impresión, vamos a ver cómo añadir algunas de es¬ 
tas posibilidades de configuración. 

Selección del dispositivo de destino 

No es extraño que en un mismo sistema hava instalados distintos sistemas 
de impresión: una impresora básica local, una impresora de red en color o de 
alto rendimiento, un dispositivo de fax, etc. Uno de esos dispositivos será el 
deslino predeterminado para los trabajos de impresión en los que, de manera 
explícita, no se indique lo contrario. 

Rl componente PrintDocument dispone de una propiedad, llamada Prin- 
terSettings, que contiene todos los parámetros de configuración para im¬ 
presión. Uno de los miembros de Pr mterSett ings contiene una colección 
con todos los dispositivos de salida existentes en el sistema. F.sta propiedad es 
InstalledPr inters, mientras que Printer aloja el nombre de la impresora 
elegida como destino. 

De manera análoga, utilizando las propiedades PrinterResolut i ons. 
PaperSizes y PaperSources de PrinterSettings podemos obtener una 
lista de todas las resoluciones que puede usar la impresora, los tamaños de pa¬ 
pel contemplados y los alimentadores disponibles. 

El número de copias que se quieren imprimir, el rango de páginas \ mi or¬ 
den son factores controlables mediante las propiedades Copies, FromPage, 
ToPage y Collate, respectivamente. 

Es posible limitar las páginas que el usuario puede elegir mediante las pro 
piedades MaximumPage y MinimumPage, asi como limitar el número de co¬ 
pias con MaximumCopies. 

Aunque podríamos crear una interfaz de usuario para facilitar la configura¬ 
ción de todos estos parámetros, resulta mucho mas cómodo utilizar un compo¬ 
nente Pr intDialog. Este dispone también de la propiedad PrinterSet tings, 
a la que podemos asignar los parámetros iniciales y de la cual recogeríamos los 
seleccionados por el usuario. El cuadro de diálogo se muestra con el habitual 
método ShowDialog( ). Podemos comprobar el valor devuelto para saber si 
se ha aceptado la contigo ración. 

Añada al formulario del ejemplo anterior los elementos que puede ver en la 
figura 14.2: dos controles Label, un TextBox, un Button v un ListBox. A 
continuación haga doble clic sobro el formulario, para abrir el método asociado 
al evento Load, e introduzca el código siguiente: 

Dim Impresora As String 

For Each Impresora In __ 

PrintDocument1.PrinterSet tinga.Insta iledPrinters 



Lis tBox i . t tems . Add ( Impresora) 

Next 

tbNombre I mp re sor a . Tex t ■* Pr int Document 1. Pr interSet t ings . PrintérNaroe 

t orno puede ver, «incidimos los nombres de todas las impresoras instaladas 
a la lista, mientras que en la capí de texto mostramos el nombre déla impresora 
seleccionada 



Figura 14.2. Aspecto del lormulario tras insertar la lista y demas elementos 


Inserte también un componente PrintDialog. t]ue aparecerá en la parle 
inlerior del diseñador, y use la ventana Propiedades para modificar su propio 
dad Document, relacionando este componente con el PrintDocument que va 
tenemos, listo facilita la sincronización automática entre la propiedad Printer- 
Settings del primero v el segundo, sin necesidad de ninguna intervención por 
nuestra parle. 

Tan sólo nos queda escribir el código asociado «il botón para cambiar de im¬ 
presora, botón que abrirá el cuadro de diálogo que puede ver en la figura 14.3. 
Si cambia de impresora el nombre de esta aparecerá en el formulario, como en 
la figura 14.4. Tenga en cuenta que los cambios que efectúe tendrán electo so¬ 
bro la impresión real, por lo que puede cambiar cualquier parámetro y a conti¬ 
nuación pulsar el botón de impresión para ver el resultado. 










Nota 


Si tan sólo quiere permitir al usuario elegir la impresora de destino, sin ac¬ 
ceder a los demás parámetros de configuración, puede usar una lista como 
la de este programa y controlar la selección de un elemento cuyo nombre 
se asignaría a la propiedad PrinterSettings . PrinterName del com¬ 
ponente PrintDocument. 

Configuración de página 

Aparte del dispositivo de destino, el numero de copias o el rango de pagi 
ñas .1 imprimir, existen otros parámetros, como las dimensiones del papel o su 
orientación v márgenes, que también afectan a la impresión, l odos estos da¬ 
los están almacenados en la propiedad Def aultPageSeLt ings, cuvotipoes 
PageSett i ngs. Al igual que ocurre con Prin terSet tings, podríamos recu¬ 
perar \ manipular de manera individual los dalos de cada una de las propieda¬ 
des de PageSettings pero, afortunadamente, ya existe un componente que 
ofrece un cuadro de dialogo para acceder a estos parámetros, tiste componente 
ex PageSetupDialog. 
















Después de insertar este componente en nuestro formulario, v asociarlo con 
el PrintDocument mediante la propiedad Document, no tenemos mas que 
llamar al método ShowDialog! ) para mostrar el cuadro de diálogo de la fi¬ 
gura 14.ñ. Automáticamente, la configuración que se efectúe será aplicada a la 
propiedad Def au 1 tPageSet Lings. 

Puede hacer una prueba insertando un componente PageSetupDi a 1 og en 
el formulario, añadiendo un nuevo botón v llamandoal método ShowDialog ( ) 
desde su evento Click. 



Figura 14.5. Ventana para la configuración de página 

Visualización preliminar 

Muchas aplicaciones ofrecen, a la hora de realizar un trabajo de impresión, 
la posibilidad de ver previamente en pantalla cómo quedará el resultado. I sto 
facilita el ajuste de diversos parámetros, como la orientación o márgenes del 
papel, sin necesidad de imprimir tísicamente en papel cada prueba que pueda 
hacerse C liando el aspecto es el deseado, generalmente desde la misma venta¬ 
na de visuali/.acion preliminar existe algún botón u opción para enviar el do¬ 
cumento *i la impresora. 

Ofrecer esa misma posibilidad en nuestros programas es realmente fácil, un 
trabajo que tan solo requerirá insertar un componente, asignar valor a una pro¬ 
piedad \ llamar a un método, asi de simple. Puede comprobarlo insertando en 
el formulario un componente Pr intPrev i ewD i a log, asociándolo con el 
PrintDocument medíanle la propiedad Document que hemos ulili/adn an¬ 
teriormente en otros componentes, y sustituyendo después la llamada Print¬ 
Document 1 .Print( ) que se producía al pulsar el botón de impresión por la 
llamada Pr i ntPreviewDialog 1 . ShowDialog ( ). 

Al pulsar dicho botón ahora no se imprimirá el documento, sino que apare¬ 
cerá un cuadro de dialogo como el de la figura 14.(> Desde él puede ver sólo 




una página o varias, ajustando su tamaño según le convenga. Si el resultado es 
satisfactorio pulsaría el botón que hay en la parte superior izquierda para im¬ 
primirlo, en caso contrario puede cerrar la ventana v modificar los parametros 
de configuración de pagina o impresora, volviendo posteriormente a la visuali- 
zaeion preliminar. 

Si desea una previsual ización más personalizada, en lugar del componente 
PrintPreviewDialog puede servirse del control PrintPreviewControl. 
liste aparece como una página en la que se visualiza el documento a imprimir 
No dispone* de botones ni elementos adicionales, va que su funcionamiento se 
controla mediante propiedades como StartPage, Zoom, Columns y Rows. es¬ 
tableciendo la primera página a mostrar, el nivel de magnificación, el numero 
de páginas a mostrar horizontal y verticalmente, fn la figura 14.7 puede ver un 
control de este tipo en el interior de un formulario. I ógicamente, tendríamos 
que añadir los elementos necesarios para cambiar la previsualización e impri¬ 
mir el documento. 



Figura 14.6. Visualización preliminar del documento a imprimir 

Puntos clave 

• La impresión de dalos en Visual Basic .NI• I se gestiona usando un com¬ 
ponente PrintDocument. liste dispone de las propiedades, eventos y 


















métodos necesarios para configurar los parámetros dr impresión \ conIro¬ 
lar el proceso. 

• Para imprimir dalos se utiliza la superficie de la página, representada por 
un objeto de la clase Graphics. Podamos usar, por tanto, todos los méto¬ 
dos que conocimos en el capitulo previo para elaborar gráficos. 

• l:\isten cuadros de diálogo prediseñados, como PrintDialog \ Page- 
SetupDialog, que facilitan la i ontiguracion de los parámetros de impre 
sión \ formato de página. 

• Mediante el cuadro de dialogo PrintPreviewDialog es posible facili¬ 
tar una vista previa de la impresión, lambién puede utili/arse un control 
PrintPrev LewControl para facilitar esa vista en una ventana propia. 



< Impresión simple 


Informe sobre uso de lenguajes 


Figura 14.7. Visualización previa en una ventana propia 


Resumen 

bste capitulo nos ha servido, principalmente, para íamilinri/arnos con el me¬ 
canismo de publicación de información con que cuenta Visual Basic .NI I . re¬ 
presentado por componentes como PrintDocument. PrintPreviewDialog 
\ Pr intPreviewControl. Ya que se puede seleccionar cualquier dispositivo 



























































de salida, es posible no solo imprimir los datos sino también enviarlos por !a\ 
o a un archivo para su posterior envío o conversión 

l a tarea de composición del documento se asemeja bastante a la descrita en 
el capitulo previo para dibujar sobre un formulario, va que cada página que va 
a imprimirse aparece a nuestros ojos como un objeto Graphics I sio nos per 
mite utilizar exactamente los mismos elementos descritos en ese capítulo; bro¬ 
chas, lápices, tipos de letra, etc. 
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DeaarroWo 
de componentes 


En lodos los ejemplos que hemos desarrollado hasta ahora, desde los pri¬ 
meros capítulos, hemos estado utilizando multitud de clases para, bien direc¬ 
tamente o bien tras la creación de un objeto, acceder a servicios concretos de la 
plataforma NET. 

En los últimos capítulos dichos objetos los hemos creado do manera visual, 
arrastrándolos sobre un contenedor y configurando su funcionamiento median¬ 
te la edición de propiedades. Cuando un objeto puede manipularse de esta for 
ma, mediante un diseñador, hablamos de componentes en lugar de llamarlos 
simplemente objetos. Un componente, por lo tanto, es un objeto creado a partir 
de una clase, como cualquier otro, pero que dispone de elementos que facilitan 
su tratamiento visual. 

A pesar del gran abanico de componentes de lodo tipo existentes en la pía 
la forma -NE I esta clara la imposibilidad de cubrir Lis necesidades de todos 
los desarrolladores. Por eso existen las terceras empresas dedicadas a la crea¬ 
ción y venta de componentes para las distintas herramientas, no siendo la pla¬ 
taforma .NET una excepción. Nosotros, como desarrolladores, también podemos 
crear componentes, va sea para nuestros propios proyectos o para proveerlos a 
terceros. 

El objetivo de este capítulo es iniciarle en el desarrollo de componentes .NET. 
clases que pueden utilizarse genéricamente y de manera indistinta en una apli¬ 
cación Windows, una aplicación Web u otro tipo de proyecto. Posteriormente, 
en los dos capítulos siguientes, entraremos en los detalles específicos de la crea¬ 
ción de controles para formularios Windows, controles ASP NEE etc 







Conceptos básicos 


Antes de entrar en los detalles del desarrollo de componentes no está de mas 
que establezcamos los conceptos básicos que deberemos conocer, asi como la 
terminología que va a utilizarse en el resto del capitulo. 

Entre otros elementos. Visual Basic .NET cuenta con un diseñador para for¬ 
mularios Windows y otro para formularios Web, que hemos conocido en capí¬ 
tulos previos, de tal manera que el diseño de interfaces de usuario Windows y 
Web se lleva a cabo con operaciones de arrastrar v soltar. Estos diseñadores per¬ 
miten seleccionar los componentes, alojarlos en un contenedor, personalizarlos 
editando sus propiedades, asociar código a los eventos, etc. 

Para desempeñar su función, un cierto diseñador actuará básicamente so¬ 
bre dos elementos; un contenedor y uno o más componentes. El contenedor es 
también un componente, aunque con la particularidad de poder alojar otros en 
su interior. Un ejemplo de contenedores un formulario Windows o bien una pá¬ 
gina Web. 

Una clase escrita en Visual Basic .NFT puede ser alojada en una biblioteca v 
Utilizada desde otra aplicación directamente, como si de un componente se tra¬ 
tase. Esa clase, sin embargo, no podría añadirse a la paleta de componentes de 
un diseñador a menos que esté derivada de System. Componen tModel. Compo- 
nent o implemento la interfaz IComponent de ese mismo ámbito con nombre. 

Análogamente, una clase no podrá considerarse un control a menos que es¬ 
té derivada, directa o indirectamente, deSystem .Windows . Forms . Control, 
en el caso de controles para formularios Windows, o System .Web. U1 .Control, 
para los controles ASP.NET. 

Para resumir este punto en mía frase, haciendo referencia a los distintos 
conceptos comentados, podríamos decir que loscoN/poucn/rs y controle* pueden 
ser alojados en un conlcncilor y personalizados mediante un dixnhnlor. 

¿Cuándo un objeto es un componente? 

Va sabemos que para que un objeto pueda ser considerado un componente 
debe poder manipularse visualmente mediante un diseñador pero, ¿qué diferen¬ 
cia existe en una clase de componente para contar con esa posibilidad? Fxisten 
dos opciones: o dicha clase implementa la interfaz IComponent directamente 
hereda esa implementación de la clase Component. Ambos elementos, la in¬ 
terfaz IComponent v la clase Component, se encuentran definidos en el ámbi¬ 
to System. ComponentModel . Giro requerimiento indispensable es que la 
clase disponga de un constructor que no necesite parámetro alguno ya que, de 
lo contrario, no podrían crearse objelos visualmente, arrastrándolos sobre un 
contenedor. 

La interfaz IComponent establece las propiedades y métodos indispen¬ 
sables para que una clase pueda ser considerada como molde para crear com¬ 
ponentes En realidad los miembros son tan sólo dos; la propiedad Site v el 



melodo Disposed. l a primera facilitare) el acceso a la interfaz ISite del con¬ 
tenedor donde se inserte el componente, medio por el cual se establecerá la co¬ 
municación entre componente y contenedor. F.l método Disposedes heredado 
por la interfaz IComponent de la interta/. IDisposed, de la cual esta deriva¬ 
da. Dicho método se encargará de liberar los recursos cuando el componente 
sea destruido. 

Aunque podríamos implementar manualmente la interfaz IComponent en 
cualquier clase propia, a fin de convertirla en una clase de componente, resulta 
mucho mas fácil derivar, directa o indirectamente, de la clase Component. lis¬ 
ta es la base genérica de la mayoría de los componentes que hemos utilizado en 
capítulos previos, especialmente al Irabajarcon formularios Windows. Compo¬ 
nent se encarga de implementar los miembros de IComponent v, además, nos 
o trece algunas propiedades v métodos protegidos, que podemos usar al deri¬ 
var de ella. 

F.n la práctica, por lo tanto, para crear una nueva clase de componente lo 
que haremos será tomar como base la clase Component o, en su detecto, otra 
clase que, directa o indirectamente, este derivada de Component Con esto po¬ 
dremos centrarnos en el desarrollo de la funcionalidad propia del componen¬ 
te, sin preocuparnos demasiado por los detalles de implementación genérica 
de cualquier componente. 


Nota 

Al definir una clase de componente hemos de tener en cuenta que, aunque 
puede crearse y ser utilizado mediante código como cualquier otra clase, 
el objetivo es facilitar la manipulación en un entorno visual. Con ese fin es 
fundamental que la clase defina mediante propiedades y eventos todos los 
atributos con que puedan contar los objetos, en vez de recurrir a métodos pa¬ 
ra efectuar esa configuración. Debe tener en cuenta que los diseñadores 
son capaces de mostrar las propiedades con que cuenta un componente y 
facilitar su edición, pero no existe la posibilidad de invocación a métodos 
durante el diseño. 


Un sencillo ejemplo 

Antes de continuar con las explicaciones teóricas relativas al diseño de cla¬ 
ses de componentes, y puesto que ya sabemos cual es la base fundamental para 
su construcción, vamos a desarrollar un sencillo ejemplo. La finalidad del pri¬ 
mer componente que vamos a diseñar será facilitar la conversión de números 
entre la base dos y la base diez, es decir, convertir números decimales en bina¬ 
rios o viceversa. 

Para conseguir esto el componente no precisa interfaz de usuario, sino sim¬ 
plemente de las propiedades adecuadas para que sea posible asignar un valor 
v obtener la conversión. 





íil componente, al que llamaremos Convertidor, dispondrá de dos pro¬ 
piedades. Al asignar un valor a Binario, concretamente una cadena con una 
secuencia de unos y ceros, lo guardaremos en una variable interna v, además, 
procesaremos el parámetro para obtener el numero decimal correspondiente. 
Éste podrá obtenerse de la propiedad Valor. 

De manera análoga, una asignación a esta ultima propiedad efectuará el pro¬ 
ceso inverso. 

Inicie un nuevo proyecto de tipo Biblioteca de clases (véase figura 15 I), ob¬ 
teniendo así un modulo donde definir una clase. Puede insertar el código mos¬ 
trado más abajo directamente en ese módulo o, si lo prefiere, utilizar la ventana 
Agregar nuevo elemento para añadir al proyecto una clase de componentes, 
como se ha hecho en la figura 15.2. 


Nuevo proyecto 
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Figura 15.1. Los componentes deben alojarse en bibliotecas de clases 
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Figura 15.2. Podemos añadir al proyecto un esqueleto de componente 
prefabricado 







l odo el código central del componente es el que puede ver a continuación. 
I I inelodo Get de cada propiedad es realmente sencillo, limilándose a devol¬ 
ver el valor que contienen las variables Fbinarío y Fvalor. Por delecto, ini- 
cialmenle. dichas variables contienen la cadena "0° y el valor entero 0. 


Public Class Convertidor 
Inherits Component 


■ *1 « * •• -• < 

Prívate Fbinarío As String = "O” 
Private Fvalor As Integer » 0 


Public Property Binario^) As String 
Ge t 

Return Fbinarío 
End Get 

i *• • ii « • i g •- » 

Set(ByVal Valué As String) 

Fbinarío = Valué 
Fvalor = 0 


Din» Contador As Integer 
Dim Exp As Integer = 0 

For Contador * Binarlo.Length To 1 Step -1 


Fvalor System . Math . Pow{ 2, Exp) * _ 

Char. GetNumericValue(Fbinarío.Chars(Contador)) 
Exp +* 1 

Next 
End Set 
End Property 


Public Property Valor() As Integer 
Get 

Return Fvalor 
End Get 


SetfByVal Valué As Integer) 

Fvalor = Valué 
Fbinarío * " M 


Do While Valué >= 2 



Fb inario = IIf( Valué Mod 2 * 0, *' 0 ” , " 1" ) 

& Fbinario 
Valué 2 

Loop 


Fbinano * Valué.ToString( ) & Binario 

End Set 
End Property 
End Class 

Como puedo ver, prácticamente toda la lógica del componente se encuentra 
alojada en los métodos de asignación de las propiedades. La conversión de de¬ 
cimal a binario es una simple división sucesiva entre dos, formando el número 
binario con todos los restos do esas divisiones y el último cociente. Ll proceso 
inverso, la conversión cié binario a decimal, se efectúa elevando la base, que es 
2, al exponente que corresponda a la posición de cada dígito Para este fin se 
utiliza el método Pow( ) de la clase Math 


Nota 

La propiedad chars del tipo string permite acceder individualmente a 
cada uno de los caracteres de una cadena, utilizando un índice compren¬ 
dido entre 0 y el número de caracteres existentes menos 1. El métodoGet- 
NumericValue ( ) de la clasechar, como puede suponer, obtiene el valor 
numérico del carácter entregado como parámetro, convirtiendo el char en 
un Double sobre el que podemos operar matemáticamente. 


Finalizado el desarrollo, el siguiente paso será compilar el proyecto con el 
fin de obtener un ensamblado, en este caso una biblioteca de enlace dinámico, 
con el código II. del componente. Esa biblioteca podemos alojarla en un reposito¬ 
rio común donde tengamos todos nuestros componentes o los componentes de 
terceros. 

Instalación de I componente 

Indistintamente del tipo de aplicación que hayamos iniciado, para utilizar 
nuestro componente Convertidor desde Visual Basic NF.T lo primero que 
tendremos que hacer será instalarlo en el Cuadro de herramientas. Con este fin 
pulsamos sobre el con el botón secundario del ratón, desplegando el menú aso¬ 
ciado, y elegimos la opción Personalizar cuadro de herramientas. Aparece un 
cuadro de diálogo en el que existen dos páginas. Abrimos la titulada Compo¬ 
nentes de .NET Framework y pulsamos el botón Examinar para localizar la 
biblioteca donde se encuentra el ensamblado del componente. 

A partir de este momento el componente ya aparecerá, como puede verse 
en la figura 15.2, en la lista de componentes que podemos agregar al Cuadro de 
herramientas. Lo seleccionamos y cerramos el cuadro de diálogo pulsando el 





bolón Aceptar. Normalmente el componente aparecerá en la página que tema¬ 
mos abierta, al final de la lista de componentes que existiese en ese momento 
(véase figura 15.4). No tenemos más que pinchar sobre él e insertarlo donde nos 
convenga. 



Personalizar cuadro de herramientas 
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Figura 15.3. Añadimos el componente a la lista de componentes NET 



Figura 15.4. El componente ya en el Cuadro de herramientas 


Este procedimiento será el habitual siempre que pretendamos usar el com¬ 
ponente de forma visual, como vamos a ver en el punto siguiente. Si tan sólo lo 
necesitamos para crearlo desde el código de nuestro programa, bastaría con 
añadir una referencia al provecto utilizando la opción Agregar referencia del 
menú asociado a la carpeta Referencias, en la ventana del Explorador de solucio¬ 
nes También podemos necesitar la inserción de una sentencia Imports al ini¬ 
cio del código para importar el ámbito en que se encuentra el componente. 









Uso vi&ual del componente 

Habiendo iniciado un provecto, va sea basado en formularios Windows o 
formularios Web, \ añadido nuestro nuevo componente a) Cuadro de herra¬ 
mientas, su uso es prácticamente idéntico til de cualquier otro componente que 
hayamos podido usar en los diversos ejemplos que se han desarrollado hasta 
ahora. I laciendo doble clic sobre el componente, o bien arrastrándolo hasta el 
contenedor, insertaremos una copia. I n ese momento habremos creado un ob¬ 
jeto a partir de l.i clase Convertidor, un componente. 

Observe que en la ventana Propiedades aparecen las propiedades que ha 
biamos delinidoen nuestra clase. En la figura puede ver como hemos alie 
rado la propiedad Valor \ obtenido su equivalente en Binario Lógicamente 
también podemos efectuar la operación inversa, modificando Binario para 
obtener el resultado en Valor Dado que el componente no tiene interfaz de 
usuario, podríamos introducir en el formulario un par de cajas de te\lo para 
habilitar la conversión en ejei lición. I I endigo se limitaría a una simple asigna¬ 
ción a Valor v lectura de Binario o viceversa 



Figura 15.5. Podemos utilizar el componente Convertidor de forma visual 


A pesar de que el componente Convertidor aparece en el Cuadro de he¬ 
rramientas v podemos crearlo \ manipularlo mediante un diseñador, lo cierto 
es une mi comportamiento como componente aún deja que desear Al moditi 
i ar en la ventana Propiedades el \ alm de la propiedad Valor la i «inversión no 




aparece automáticamente en Binario, siendo necesario desplazarse hasta di 
i ha propiedad para ver el resultado. Lo mismo ocurre en sentido inverso. Otro 
comportamiento anómalo se produce cuando asignamos un valor a Binario. 
I n teoría el numero debería estar compuesto sólo de 0 v 1, puesto que os bina¬ 
rio. Ln la práctica, sin embargo, puede comprobar que es posible la introduc¬ 
ción de cualquier otro dígito. 

Mejoras para la fase de diseño 

Al crear un componente hav que pensar que el usuario lo usara en el inte¬ 
rior de una herramienta de diseño, como pueda ser Visual Basó \T I Aparte 
de implementar la funcionalidad propia del componente, como son los méto¬ 
dos de conversión en uno de nuestros ejemplos previos, también podemos in¬ 
cluir en la misma biblioteca oíros elementos, como atributos, convertidores de 
valores, editores de propiedades, diseñadores específicos, ele. 

Muchos de estos elementos se definen mediante atributos que, como sabe, 
se colocan delante de distintos elementos del lenguaje delimitados entre los ca¬ 
racteres < y >. 

I os atributos se incluyen en el ensamblado como meta-información, dalos 
que describen aspectos concretos de los objetos o sus miembros pero que no se 
implemenlan mediante código. 

Atributos para componen tes 

Si ha observado la ventana Propiedades, habrá podido ver que en ella las 
distintas propiedades están clasificadas en categorías, listo simplifica el haba 
jo, de manera que si estamos definiendo la apariencia de un contri»! no tenemos 
que estar buscando propiedades dispersas al estar ordenadas alfabéticamente. 
Al seleccionar una propiedad cualquiera habrá visto que en la parte inferior apa¬ 
rece una descripción. La categoría de una propiedad, su descripción, la propie¬ 
dad por delecto de una clase \ otros elementos similares se definen mediante 
atributos 

Inserte nuestro control de conversión en un formulario y fíjese en lo que ocu¬ 
rre Las dos propiedades que hemos definido aparecen al final de la ventana de 
propiedades, en una categoría llamada Varios Al seleccionar cualquiera de 
ellas, en la parte inferior tan sólo aparen* el nombre v no una descripi ion. I sto 
ocurre porque en nuestra clase no hemos incluido los atributos necesarios para 
facilitar toda esta información 

hodemos asociar una lista de atributos a una clase, una propiedad, un mé¬ 
todo, un evento y, en general, casi cualquier miembro que pueda contener la 
clase. Los atributos van contenidos, como se ha dicho antes, entre los símbolos 
< v > v, en caso de existir varios, se separan con comas. C ada atributo se com¬ 
pone de una palabra clave v un valor facilitado entre paréntesis. I .«i tabla 1S.I 
enumera algunos de los atributos de uso mas corriente 



Tabla 15.1. Atributos en controles 


Atributo 


Descripción 


Bindable 

Browsable 

Category 
DefaultEvent 
DefaultProperty 
De f au1tVa1ue 
Description 
Editor 

TypeConverter 
Designer 


Indica si la propiedad puede enlazarse con un origen de 
datos 

Indica si la propiedad debe aparecer o no en la ventana 
de propiedades 

Asocia la propiedad a una determinada categoría 
Establece el evento por defecto para el control 
Establece la propiedad por detecto para el control 
Fija el valor por defecto que tendrá la propiedad 
Facilita la descripción para la propiedad o evento 
Asocia un editor específico con una propiedad 
Asocia un conversor de tipo con una propiedad 
Asocia un diseñador específico con el componente 


Utilizando algunos de estos atributos podríamos modificar nuestro control 
dejándolo como se muestra en el código siguiente, en el cual se ha omitido el 
código de implementación de las propiedades puesto que éste no sufre ningún 
cambio. 


<Defaul tPropertyt "Valor** )> _ 

Public Class Convertidor 

Inherits System.ComponentMode1.Component 

Private Fbinario As String * "O" 

Private Fvalor As Integer - 0 

<Cat.egory( "Apariencia" ) , 

Description("Valor representado en binario”). 

DefaultValue("00000000")> 

Public Property Binario() As String 

End Property 

<Cateqory("Apariencia”) , 

Descripción("Contiene el valor en decimal"), 

DefaulCValne(0) > _ 

Public Property Valor() As Integer 

End Property 
End Class 

Si iras introducir estos cambios compila el componente y lo utiliza podrá 
advertir varios cambios. Ahora las dos propiedades va no aparecen en la sec¬ 
ción de misceláneas sino al principio, en la categoría Apariencia. Al seleccionar 
cualquiera de ellas verá una descripción en la parle inferior Observe, ademas. 





que se indica cuál es el valor por detecto de esta propiedad, En la ventana Pro¬ 
piedades el valor aparecerá destacado en negrita si se ha modificado o, por el 
contrario, con el tipo normal sí se mantiene el valor por defecto. Al insertar un 
nuevo componente Convertidor, o al cambiar de un componente a otro la se¬ 
lección, verá que la propiedad que aparece seleccionada por detecto en la ven¬ 
tana Propiedades es Valor, va que así lo hemos indicado mediante el atribulo 
Def aultProperty de la clase. En la figura 15.6 puede ver el control con la 
propiedad Valor seleccionada y su descripción en la parte inferior. 
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Figura 15.6. Los atributos asociados al control son usados por el entorno 
de diseño 


Actualización automática á& la ventana Propiedades 


Uno de los problemas que plantea nuestro componente, tal y como está di¬ 
señado en este momento, es que al modificar la propiedad Valor la actualiza¬ 
ción de Binario no es inmediata, ocurriendo lo mismo en sentido inverso. Por 
regla general la modificación de una propiedad de un componente no implica 
cambios en otra, por ello la actualización de los valores no se produce de ma¬ 
nera automática, como sería de desear en este caso. 

Este comportamiento por defecto, al igual que muchos otros tactores del 
comportamiento en la fase de diseño, se controla mediante atributos. En este ca¬ 
so el atributo que nos interesa es RefreshProperties, que puede tomar 
como valor uno de los valores que se enumeran en la tabla 15.2. Añadiendo 




Ref reshProper t ies ( Ref reshProper t ies . Al 1) a la lista di* atribuios de 
las propiedades Binario v Valor, v tras compilar de nuevo la biblioteca que 
contiene el componente, podrá ver que ahora el comportamiento es mucho mas 
lógico. Al cambiar el valor de una de las propiedades la otra se actualiza de tur¬ 
ma inmediata, mostrando la conversión. 

Tabla 15.2. Valores para el atributo Ref reshProperiies 

Valor Indica 

Default Comportamiento por defecto El cambio de valor de esta propie¬ 

dad no implica la actualización de otras 

Repaint El cambio de valor provocará la actualización visual de todas las 

demás 

Al 1 El cambio de valor provocará la lectura y actualización visual de 

todas las demás 


Nota 

La diferencia entre Ref resh Proper t ies . Repaint y RefreshProper- 
ties. All es que la primera actualiza la visualización de las propiedades 
usando los valores que tuviesen en ese momento, mientras que la segunda 
releerá dichos valores para asegurarse una actualización completa, que es 
lo que nos interesa en nuestro caso. 


Val oree por defecto y persistencia 

Al asignar atribuios a nuestras propiedades hemos usado DefaultValue 
para facilitar el valor por delecto que tendrán, el valor inicial. lambien hemos 
visto que en la ventana Propiedades ese valor aparece con el tipo normal, mien¬ 
tras que se muestra en negrita cuando ha sido modificado. I n realidad dicho 
atribulo no tiene lina finalidad visual, sino que determina la persistencia del va¬ 
lor de una propiedad 

Puede comprobar lo que ocurre al modificar el valor de una propiedad de 
Convertidor examinando el código que genera el diseñador. Inclín a el com¬ 
ponente en un formulario Windows, por ejemplo, v compruebe el código. \ era 
que no se asigna explícitamente ningún valor a Convertidor 1 va que Valor 
v Binario mantienen su valor por defecto. Modifique el contenido de Valor 
v observe el código. Ahora aparecen sendas sentencias de asignación, una para 
Valor v otra para Binario. De esta manera, al ejecutar el programa, el com 
ponente tendrá en principio los valores que se establecieron durante la lase de 
diseño. 

I I atribulo DefaultValue es uno de los mecanismos con que cuenta Vi¬ 
sual Basic .Mí para controlar la persistencia, mediante código, del valor de 
las propiedades, pero no el único. P.n el caso de nuestro componente la asigna- 





ción tit* valor a una de las propiedades implica aulomalicamente el cálculo del 
valor de la otra, por lo c]UC no tiene mucho sentido que el diseñador conserve 
la asignación de los valores establecidos en la lase de diseño corno dos senten¬ 
cias independientes Con asignar a Valor serta suficiente para que Binario 
tuviese su valor. Binario, por tanto, no tendría por que conservarse en el có¬ 
digo de iniciación del provecto. 

P.Mste una opcion, para controlar la persistencia de las propiedades que es 
mucho mas flexible que el atribulo DeíaultValue. Consiste en añadir a la cla¬ 
se nn método privado que tenga por nombre ShouldSer i a i i 2eXXXXX ( ) As 
Boolean, donde XXXXX sería el nombre de la propiedad cu va persistencia se 
desea controlar. Dicho método devolverá True. si debe conservarse el valor 
de la propiedad, o f'alse en caso contrario. Antes de devolver dicho valor el 
método puede efectuar el proceso que desee, es decir, la decisión de si un valor 
se conserva o no puede ser todo lo compleja que se necesite 

t u nuestro caso, bastaría con añadir el método siguiente a la clase Conver¬ 
tidor para conseguir lo que queremos: 

Private Function Shoul-dSeriál IzeBi nar i O { ) As Boolean 
Return False 

End Function 

También tendríamos que eliminar el atributo DefaultValue de la propie¬ 
dad Binario que, a partir de ese momento, nunca conservará su valor de ma¬ 
nera explícita, indistintamente del valor que tenga Al conservarse el contenido 
itc la propiedad Valor, sin embargo. Binario también tendría siempre el da¬ 
lo apropiado. 

Validez de Iofi> valores asignados 

Aunque el comportamiento de nuestro componente ha mejorado considera¬ 
blemente desde su primera versión, aun siguen existiendo algunos puntos que 
pueden mejorarse, Pruebe a asignar a Binario un numero que no solo conten 
ga los dígitos 0 y I. incluso conteniendo caracteres alfabéticos Verá que lo per¬ 
mite. Pruebe también a asignar a Valor cualquier numero negativo v verá lo 
que ocurre. Lógicamente hav problemas que resolveren la implemenlai ion de 
Convertidor 

Cuando se define una propiedad el método Set no esta ahí sólo para guar 
dar el valor facilitado v, como en nuestro caso, efectuar algún proceso para ob¬ 
tener un resultado. I ’se método también debe utilizarse para comprobar que el 
valor entregado es válido, evitando en caso contrario su conservación en los 
métodos internos di* la clase. I o habitual, para comunicar el problema al dise¬ 
ñador o al código que está usando el componente, es generar una excepción. 

Deberíamos, por lanío, modificar los métodos Set de nuestras propiedades 
para efectuar las comprobaciones necesarias, generando una excepción en caso 
de que el valor facilitado sea inválido. De esta forma, al asignar un valor erró¬ 
neo utilizando la ventana Propiedades aparecerá una ventana similar a la de la 



figura 15.7, comunicando el error, y el v alor aparecer.) seleccionado en la pro¬ 
pia ventana Propiedades. Podemos modificarlo, introduciendo un valor correc¬ 
to, o bien pulsar la tecla Esc para devolverle el valor que tenía anteriormente. 
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Figura 15.7. Mensaje que indica la asignación de un valor erróneo 
a la propiedad Binario 

Eventos y atributos 

Un componente, como cualquier otra clase, puede generar eventos. Es más, 
en el caso de las clases de componentes los eventos son un medio imprescindi¬ 
ble para comunicarse con la aplicación en que vayan a ser utilizados. Ya sabe 
cómo definir sus propios eventos, así como generarlos y gestionarlos. En los 
componentes la mayoría de los eventos son de tipo EventHandler, un tipo 
que establece que el método que actué como gestor recibirá dos parámetros: 
una referencia al componente que ha generado el evento y un objeto EventArgs 
con los parámetros que sean aplicables. 

Al igual que las propiedades y las clases, los eventos pueden tener asocia¬ 
dos* atributos que, por ejemplo, establezcan su categoría o faciliten una des 
cripción. Al trabajar con Visual Basic .NET esos elementos no son accesibles, 
pero si trabajásemos con Visual O, por ejemplo, veríamos que la lista Propie¬ 
dades también muestra una lista de eventos, apareciendo éstos agrupados por 
categorías v con una descripción. En la figura 15.8 puede ver los dos eventos 
añadidos al componente Convertidor en la ventana Propiedades Iras haber 
iniciado un proyecto con C 

A continuación tiene el código completo del componente Convertidor en 
su versión linal, con la definición y generación de los eventos y cambios en los 
métodos Set de las propiedades para verificar el valor y, en caso de encontrar 
algún error, generar la correspondiente excepción. 

Imports System.Componen 1Model 


< Del au 11 Propert y ( "Valor" ) , Def au 1 1 F.vpnt { "Va IorChanged” ) > 
Public class Convertidor 

Inherits System.Componen! Model.ComponenL 




Private Fbinario As String *= "0 
Private Fvalor As Integer * 0 


i■ «* I - - li • ir «1 •*«»»*, .1 

<Category("PropertyChanged "), 

Descriptionl"Comunica el cambio de valor en la propiedad'*) > 
Public Event BinarioChanged As EventHandler 

<Cateqory("PropertyChanged ”), 

Description("Comunica el cambio de valor en la propiedad")> 
Public Event ValorChanged As EventHandler 


.i r u ; H i • «¡ I" . • ' - 

t ♦ »|| ,« «i/ . vi r* . . 

<Category("Apariencia" ) , 

Description("Valor representado en binario”), 
RefreshProperties(RefreshProperties.All)> _ 

Public Property Binario() As String 

• • • ' 4 ; » u i»* >; • i i v? • • i *i» 

Get 

Return Fbinario 
End Get 


Set(ByVal Valué As String) 

If Valué = Fbinario Then Return 
Dim Resultado As Integer 


Dim Contador As Integer 
Dim Exp As Integer * 0 

For Contador * Valué.Length - 1 To 0 Step -1 

* • ,#»r- t- • /.. -f *rr * •’< .• 

If "01IndexOf(Valué.Chara(Contador)) ■ -1 Then 

Throw New ArgumentOutOfRangeException(”Digito invalido") 

End If 




Resultado +- System.Math.Pow(2, Exp) * _ 

Char.GetNumericValué(Valué.Chars(Contador)) 
Exp f= 1 

Next 

- .. . ,*r •• a • hM é. 

Fbinario =» Valué ; ■ - 

Fvalor = Resultado 


RaiseEvent BinarioChanged( Me , EventArgs.Empty) 

End Set 
End Property 


: < i-l .•.]< . . • .i m . . ■ . •"l'Iii'í R j u' ic.i fi-r 

Private Function ShouidSerializeBin«rio( ) As Boolean 
Return False 
End Function 



<Category("Apariencia" ) , 

Description(“Contiene el valor en decimal"), 
DefaultValue(O), Ref reshProperties(Ref reshPropertíes.Al1) 

Public Property Valorí) As Integer 

.» —« X ►t.t 4M” • «« .-»• * \ -4 >%•’. «,►* : <« .1 • .1*.-' 

Cet 

Return Fvalor 
End Get 

Set(ByVal Valué As Integer) 

;« • 4mí.* j> . «... 

If Valué = Fvalor Then Return 


. , vaív»* n.i «•■* . «j/dc- 'n-J i.* • • w 

If Valué < 0 Then Throw _ 

New ArgumentOutOfRangeException i "Valor inválido”) 


*■ ■ .f jCi* f. 'I f .1 \ i 

Fvalor * Valué 
Fbinario * -" 
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« **f | . > ¿r. . it.4 r »«il< ■* r** f - . f •. 
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Do While Valué >- 2 

Fbinario = Ilf(Valué Mod 2=0, "0", 
& Fbinario 
Valué \= 2 

Loop 

í-r ft'. — 11 1 • 


. r»n • i »•/ te- 1 «<!./>• * 

Fbinario * Valué .ToString() & Binario 
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RaiseEvent ValorChanged(Me, Event Args .Empty) 

End Set 
End Property 
End Class 
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Figura 15.8. Los eventos también se agrupan en categorías 



I I método Set que mas cambios ha sufrido es el de la propiedad Binario, 
va que se ha trasladado la conservación de los nuevos valores al final del meto- 
do, tras verificar que no se encuentra ningún dígito inválido en la cadena entre¬ 
gada como parámetro. 

Fíjese en como usamos el método IndexOf ( ) de la clase String para com¬ 
probar que cada carácter de ese parametro solo sea 0 o I. 


Nota 

Observe que al inicio de la clase se ha definido un evento por defecto. Ese 
evento será el que se va a utilizar al hacer doble clic sobre un componente 
Binario. 


Editores y convertidores a medida 

hn los ejemplos de controles de este capítulo siempre hemos definido propie¬ 
dades de tipos básicos, como String o Integer I os editores de propiedades 
de Visual Basic NIr I saben como convertir esos valores en una representación 
apropiada para el usuario, permitiéndole asi ver y modificar el contenido de la 
propiedad En ocasiones, sin embargo, puede darse el caso de que el tipo de 
una propiedad no sea uno de los fundamentales y, por tanto, no sea posible 
editarlo directamente. En estos casos existen varias alternativas 

Una de las opciones posibles es crear un objeto convertidor que, mediante 
ciertos métodos clave, se encargue de la conversión del valor de la propiedad a 
un tipo representable en la ventana de propiedades. 1.a clase di* dicho objeto 
deberá derivarse de TypeConverter, que es una clase definida en el ámbito 
System. ComponentModel y de la que es necesario redefinir básicamente tres 
métodos: CanConvertFrom( ), ConvertFrom( ) y ConvertTo( ). El prime¬ 
ro indicará si es posible o no convertir un cierto tipo al tipo de la propiedad, 
mientras que los otros dos efectuarán la conversión en ambos sentidos. 

Si un convertidor de tipo no es suficiente, siempre cabo la posibilidad de 
crear un editor de propiedades especifico para nuestra propiedad. Esta es una 
tarea relativamente mas compleja v, además, hav que tener en cuenta que un 
editor de propiedades establece una estrecha conexión con el diseñador en el 
que se utiliza, de tal forma que hay una dependencia entre ambos y el editor no 
podría ser usado en otro diseñador. 

Para crear un editor de propiedades personalizado deberíamos derivar una 
nueva clase tomando como base a System. Drawing. Des ign. UITypeEditor, 
redefiniendo los métodos GetEditSty le ( ), para establecer el tipo del editor, 
v EditValue< ). que pondría en marcha la edición del valor de la propiedad. 

Los convertidores y editores específicos, junto con los atributos previamen¬ 
te mencionados, son los elementos mas habituales que podremos añadir para 
mejorar el uso de nuestros componentes en las herramientas de diseño. Pode¬ 
mos, no obstante, crear otras utilidades como extensores, que añaden propieda¬ 
des a otros controles e, incluso, nuestros propios diseñadores. 





Puntos clave 


• Los componentes son objetos construidos para poder alojarse en el inte¬ 
rior de un contenedor y, eventualmente, manipularse mediante un dise¬ 
ñador. 

• Tara que una clase pueda considerarse una clase de componente debe ¡m- 
plementar la interfaz IComponent, para lo cual basta con derivar la nue¬ 
va clase tomando como base Component. 

• Al desarrollar un componente hay que iniplementar la mayor parte posi¬ 
ble de su funcionalidad mediante propiedades y eventos, contribuyendo 
a su personalización en la tase de diseño en lugar de escribiendo código. 

• Mediante atributos es posible mejorar el comportamiento de los compo¬ 
nentes en el diseñador, agrupando propiedades y eventos en categorías, 
facilitando descripciones, valores por defecto, etc. 

• La persistencia de las propiedades de un componente puede controlarse 
mediante el atributo Defaultvalue o bien implementando un método 
privado ShouldSerialize ( ) que decida cuándo debe o no mantenerse 
el valor de la propiedad. 

• Al construir una clase de componente hay que aprovechar los métodos 
Set de las propiedades para asegurar que los valores sean válidos. 

• Es posible facilitar convertidores propios, editores y diseñadores específi¬ 
cos para las propiedades de nuestros componentes. 

• Una vez compilados, los componentes se alojan en una biblioteca que po¬ 
demos usar desde cualquier tipo de proyecto. 


Resumen 


Como ha podido ver en este' capitulo, el desarrollo de componentes .NKI es 
poco más que una extensión de la definición de clases de objetos que ya cono¬ 
cíamos. Una clase de componente dispone de métodos, propiedades y eventos, 
como cualquier otra, si bien se hace mayor hincapié en las posibilidades de 
manipulación durante la fase de diseño. Por ello se hace un uso intensivo de 
los atributos a fin de facilitar información descriptiva al entorno, información 
con la cual el diseñador puede agrupar los miembros o decidir si un cierto va¬ 
lor en una propiedad debe o no escribirse en el modulo de código. 

La clase Component, que hemos usado como base de nuestro componente 
de ejemplo, facilita una implementación estándar de la interfaz IComponent. 
De manera análoga, existen clases que pueden servirnos como base para cons¬ 
truir no ya componentes genéricos, como Convertidor, sino controles espe¬ 
cíficos para aplicaciones Windows o aplicaciones Web. Será el tema que vamos 
a abordar en los dos próximos capítulos. 






16 

Controlen 

Windows 


1 os componentes .NFT, derivados do System.ComponentModel. Compo- 
nent, puodon utilizarse j»enéric*imente en cualquier tipo de proyecto que po¬ 
damos desarrollar con Visual BasU .NKI pero, a cambio, no aprovechan las 
posibilidades que tiene a su alcance un control especifico para formularios 
Windows, por poner un ejemplo. 

Como ya se apuntaba al final del capitulo previo, en el que conocimos los 
fundamentos de desarrollo de componentes, en éste vamos a conocer los ele¬ 
mentos necesarios para crear nuestros propios controles Windows, entendien¬ 
do como tales aquellos que están diseñados específicamente para ser insertados 
en un formulario Windows. Conocerá las distintas clases que puede utilizar 
como bases de sus propios controles y aplicará este conocimiento en la práctica 
con varios ejemplos. 

Toda la información del capitulo previo resultará fundamental para poder 
abordar este. No en vano, un control Windows no es más que un componente 
.Nt ; .T con lina serie de características concretas, l a forma de implementar pro¬ 
piedades, eventos y métodos, describir su funcionamiento mediante atributos, 
eti., será, por tanto, idéntica a la explicada en dicho capitulo 


Tipos áe controles Windows 


Al crear una nueva clase de control tenemos varias opciones en cuanto a la 
clase que actuará como base: Control, ScrollableControl, UserControl 





y ContainerControl, (odas ellas alojadas en el ámbito System. Win¬ 
dows. Forms. En realidad las posibilidades son muchas más, va que podemos 
tomar como base la clase de cualquier control existente. Estas cuatro clases po¬ 
dríamos decir que son las raíces fundamentales del resto. 

En la parte más alta del árbol jerárquico se encuentra la clase Control, de¬ 
rivada de System.ComponentModel.Component, clase que ya conocemos. 
La clase Control, por tanto, ya dispone de una implementacion por detecto 
de IComponent, característica indispensable para todo componente NF I in¬ 
distintamente de su tipo. 

Además, la clase Control se ocupa de lareas comunes a todos los controles 
Windows: posición v dimensiones, gestión de la entrada de datos por teclado v 
ratón, obtención de un manejador de ventana, etc. Control es la base adecua¬ 
da para crear controles totalmente nuevos, no con una funcionalidad similar a 
uno ya existente, y que se ocupan de facilitar su apariencia para mostrarse en 
el interior del formulario. 

Una de las clases derivadas de Control es ScrollableControl. una cla¬ 
se que extiende la funcionalidad de Control para facilitar la visuali/acion de 
barras de desplazamiento, indispensables cuando el contenido que debe mos¬ 
trar el control excede de sus dimensiones. Las propiedades y métodos añadi¬ 
dos por ScrollableControl controlan la visual ¡/ación de las barras y el 
desplazamiento, automático o manual, del contenido del control. 

Si necesitamos que nuestro nuevo control pueda, a su vez, contener a otros, 
entonces la clase base que nos interesa es ContainerControl, derivada di¬ 
rectamente de ScrollableControl. Lo que ofrece ContainerControl, bá¬ 
sicamente, es la gestión del foco de entrada para los controles alojados en el 
nuestro. 

F.n la práctica no es habitual usar ContainerControl ni Scrollable¬ 
Control como bases directas de nuevos controles, puesto que UserControl, 
derivada de ContainerControl, aporta toda la funcionalidad de las demás 
clases y, además, Visual Basic .NI i cuenta con un diseñador que facilita la 
creación de controles que tienen como base a UserControl, no ocurriendo lo 
mismo con las demás clases. 


Nota 

A los controles que usanuserControl como base y contienen otros se les 
conoce habitualmente como controles compuestos , mientras que los deri¬ 
vados de Control son considerados controles simples. 


Además de diseñar nuevos controles partiendo de cualquiera de las clases 
comentadas hasta ahora, lógicamente también podemos crear controles basa¬ 
dos en otros ya existentes, modificando su comportamiento o bien añadiendo 
alguna nueva característica. Podemos, por ejemplo, derivar una nueva clase 
tomando como base a Windows . Forms . Bu t ton creando una nueva clase de 
botón que, al ser pulsado, genera un pitido. 





La clase Control 


Dado que Control es la clase de la cual derivan todas las demás clases de 
controles, ya sea directa, como ScrollableControl, o indirectamente, como 
UserControl, está claro que su conocimiento resulta fundamental para po¬ 
der crear nuestros nuevos controles. 

Todos los miembros de Control estarán presentes en nuestra clase de con¬ 
trol, indistintamente de dónde derivemos. 

Ya en el capitulo dedicado a los formularios Windows conocimos muchos 
de los miembros de Control, miembros que entonces apuntábamos como co¬ 
munes entro todos los controles que utilizamos en los diversos ejemplos. Esos 
miembros también aparecerán en nuestro control, sin necesidad de que ha¬ 
gamos nada especial. Sí nos interesa, sin embargo, saber cómo modificar ese 
comportamiento por defecto, por ejemplo redefiniendo métodos, ocultando 
propiedades, etc. 

Si al utilizar un control cualquiera los miembros de Control que nos inte¬ 
resaban eran los públicos, accesibles desde la ventana Propiedades y el código 
de nuestro programa, al derivar una nueva clase tomando Control como base 
también serán de nuestro interés, y de manera especial, todos los miembros 
protegidos. 

Como ya sabe, los miembros protegidos de una clase no son accesibles des¬ 
de el exterior, por ejemplo al crear un objeto de dicha clase, pero si pueden ser 
usados por clases derivadas. 


Derivar de Control 


Tras crear una nueva biblioteca con Visual Basic .NET, que nos servirá para 
alojar nuestros controles, para derivar una nueva clase desde Control proce¬ 
deríamos de la misma manera que lo hicimos en el capitulo previo con Con¬ 
trol. Basta con tomar como base a Control para tener ya un control con 
cierta funcionalidad, capaz de mostrarse en el interior del formulario en una 
posición y con unas dimensiones, aunque sin nada en su interior. 

Introduzca el código siguiente en el editor: 

Public Class Flecha 

Inherits System.Windows.Forms.Control 

End Class 

Compile el proyecto y añada a la solución una aplicación basada en formu¬ 
larios Windows. 

Personalice el Cuadro de herramientas añadiendo el nuevo control, como se 
ha hecho en la figura 16.1, y a continuación insértelo en el formulario. Observe 
la ventana Propiedades. En ella aparecen propiedades como BackColor y 
ForeColor, Font, TabStop y Tablndex, Text, etc. Todos esos miembros 
han sido heredados de la clase Control. 
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Figura 16.1. Añadimos el nuevo control al Cuadro de herramientas 


Dibujo del control 

Un control que dispone de lodas las propiedades habituales pero que no las 
usa para nada, como en este momento ocurre con nuestra clase Flecha., no es 
demasiado interesante. Lo primero que haremos sera dar un contenido visual 
a ese control, cuva funcionalidad, hasta ahora, no hemos definido. Por su nom¬ 
bre, no obstante, es fácil deducir que se tratará de un control gráfico que mos¬ 
trara una flecha o, mejor dicho, aparecerá como una flecha en el contenedor 
donde sea insertado. 

La clase Control se encarga de procesar la mayoría de los mensajes del sis¬ 
tema y dispositivos de entrada de información, convirtiendo esos eventos en 
invocaciones a métodos que nosotros, en nuestra clase derivada de Control, 
podemos redefinir. Cada vez que es necesario redibujar un control se genera el 
evento Paint, evento que la clase Control traduce en una invocación al mé¬ 
todo OnPaint. Análogamente encontramos el método OnEnter, OnKeyDown, 
OnGotFocus, etc. 

Todos estos métodos pueden ser redefinidos en nuestra nueva clase de con¬ 
trol. Para ello recurra a las listas que aparecen en la parte superior del editor 
de código. Kn la de la izquierda seleccione (‘I elemento (Reemplazos), consi¬ 
guiendo en la derecha la lista de todos los miembros que pueden redefinirse. 
Seleccionamos OnPaint y completamos este método con el código siguiente: 


• . *“•*«» •» - 4 •t 't ' e .1 i » 1 • 

Protected Overrides Sub OnPaint.( _ 

ByVal e As System . Windows . Forma . Paint.Event.Args ) 

4? j fri'Wf dinos © u 

MyBase.OnPaint(e) 


lí.i y 







Dim Lápiz As New Peni Me.ForeCo1or, i) 

I.apj. z . EndCap - Drawirig . Drawing2D. LineCap . Ar rowAnchor 

Lapi ?.. Sla rtCap -*■ Drawing . Drawing2D . Li neCap . Ar rowAnchor 

e.Graphics.DrawLine(Lapiz, 0, 

Me.ClientSize. Height \ 2, 

Me. Cl ientSize .Width — 1, 

Me.Client.Size.Height \ ¿) 

End Sub 

I o primero que hacemos es invocar al método OnPaint de la clase base. 
F.slo es habitual al redefinir un método en una clase derivada, va que asi per¬ 
mitimos. en este caso, que la clase Control eleclue su parle del trabajo, por 
ejemplo obteniendo un manejndor de ventana para acceder al arca de dibujo. A 
continuación usamos los servicios de C.DI+. que va conocemos, para dibujar 
una linea con dos puntas de Mee ha en los extremos 

Simplemente volviendo a compilar la biblioteca que tiene el i onlrol. asumien¬ 
do que tiene abierta en la misma solución un provecto Windows con un formu¬ 
lario que contiene uno o mas controles Flecha, vera que automáticamente 
aparece el dibujo. 

Modifique en la ventana Propiedades el valor de ForeColor, vera que de 
inmediato la flecha se dibuja con el nuevo color Si altera las dimensiones ini¬ 
ciales del control Flecha, no obstante, comprobará que ocurre algo extraño. 
No se dibuja adecuadamente y el electo, como se aprei ia en la parte derecha de 
la figura lh.2. no es precisamente el deseado. 








Propiedades protegidas 

La dase Control dispone de varías propiedades protegidas, asi como una 
importante lisia de métodos protegidos. Podemos tanto redefinir estos miem¬ 
bros como utilizarlos cuando nos interese. Una deesas propiedades esResize- 
Redraw. que controla la actualización visual del control cuando se alteran sus 
dimensiones, v otra CreateParams, usada para recuperar diversos parámetros 
antes de la creación del control 

Usando la propiedad ResizeRedraw podemos evitar el problema que tene¬ 
mos ahora mismo con nuestro control Flecha, codificando un constructor por 
defecto como el siguiente: 


Public Sub New)) 

MyBase. New() 

, -y ti _•» ¿mi ^ s «i . ; • 

Me. ResizeRedraw * True 
End Sub 

Tras llamar al constructor de la clase base. Control en esto caso, lo único 
que hacérnosos asignar el valor True a la propiedad ResizeRedraw. Con este 
cambio, tras compilar de nuevo la biblioteca, podrá ver que el control actualiza 
su apariencia sin problemas. 

I.a segunda propiedad mencionada, CreateParams, es sólo de leclura. 
Puede interesarnos, por tanto, a escala informativa. Su utilidad principal, sin 
embargo, la encontraremos al redefinirla en nuestra clase de control, puesto 
que podemos modificar los parámetros que Control entrega al sistema para 
la creación del control y, por lo tanto, añadir características especificas de la 
plataforma. 

En caso de que decidamos redefinir la implementación por defecto de la pro¬ 
piedad CreateParams debemos dar, básicamente, tres pasos: recoger di* la 
propiedad CreateParams de nuestra clase base el valor que contiene, una re¬ 
ferencia a un objeto de la clase CreateParams. 

Modificar los miembros de dicho objeto según nuestro objetivo v. finalmen¬ 
te, devolver ese objeto como resultado. De esta turma podemos, por ejemplo, 
alterar la posición o dimensiones iniciales de nuestro control o establecer el 
texto que contendrá inicialmente. 

Si su única utilidad fuese esa, fijar posición, dimensiones o texto, lo cierto es 
que la propiedad CreateParams no resultaría de mucho interés, va que esos 
parámetros también pueden establecerse, por ejemplo, en el constructor del 
control, sin necesidad de redefinir ninguna propiedad. La clase CreateParams 
devuelta por esa propiedad, sin embargo, cuenta con algunos miembros que. 
como Style o ExStyle, tijan parámetros, que podríamos considerar de bajo 
nivel, no accesibles de ninguna otra manera. Esos parámetros se utilizan exclusi¬ 
vamente en el momento de la creación del control v, para entenderlos, tendría¬ 
mos que recurrir a la documentación de las funciones CreateWindow ( ) v 
CreateWindowEx ( ) del API de Windows. 



I I miembro Style de CreateParams es un entero que puede contener 
múltiples bits activos indicando diversos estilos para el control Dichos estilos 
se corresponden con el parámetro style de la función CreateWindow( ) Al 
gtinos de esos parámetros son los que se enumeran en la labia 16.1 l o mismo 
ocurre con el miembro ExStyle, aunque en este caso se corresponde con un 
parámetro de la función CreateWindowEx( ) que se usa para algunos estilos 
extendidos. En la labia 16.2 se citan algunos de los estilos extendidos 


Tabla 16.1. Valores que puede contener el miembro style 
de CreateParams 


Constante Win32 

Valor 

Significado 

WS_BORDER 

&H800000 

Dota al control de un borde simple alrededor 

WS HSCROLL 

& H 10 0 0 0 0 

Añade una barra de desplazamiento horizontal 
al control 

WSVSCROLL 

&II200000 

Añade una barra de desplazamiento vertical al 
control 

WS_TTCKFRAME 

&H40000 

Dota al control de un borde grueso redimensio- 
nable 

WS_MTNTMIZEBOX 

S.H 1 0000 

Muestra en la ventana un boton para minimizar 

WS MAX IMIZ EBOX 

Í.H20000 

Muestra en la ventana un botón para maximizar 

Tabla 16.2. Valores que puede contener el miembro ExStyle 
de CreateParams 

Constante Win32 

Valor 

Significado 

WS EX CI.IFNTEDGE 

&H200 

El control tendrá un borde resaltado (3D) 

WS_EX_STATTCEDGE 

& 11200000 El control tendrá un borde tridimensional 

estático 

WS_EX_ T RANSPAREN T &H20 

El control será transparente 

WS_EX_LEFT 

0 

La alineación del control será a izquierda 

WS EX RTGHT 

un ooo 

La alineación del control sera a derecha 

Aunque las constantes indicadas son sólo una pequeña parle de las que te¬ 
nemos a nuestra disposición, resultan suficientes para mejorar la apariencia de 
nuestro control. Podemos, por ejemplo, añadirle un borde alrededor o, incluso 
mejor, definir una propiedad que permita elegir el tipo de borde: 


Prívate Const WS EX STATICEOGt; = &H20000 
Prívate Const WS BORDER * iHBOOOOO 


Prívate FBorderStyle As BorderStyle - BorderSt. y le . None 





<Category( "Apariencia" ) , 

Description( M Fija el tipo de borde alrededor del control"), 
Defau1 tVa 1ue (Windows.Forras.BorderStyle.None)> _ 

Public Property BorderStyle () As Windows.Forras.BorderStyle 

Get 

Return FBorderStyie 

End Get 

Set(ByVal Valué As Windows.Forras.BorderStyle) 

FBorderStyie » valué 


Me . Recreatellandle < ) 

End Set 
End Property 

Observo que han sido declaradas dos consumios con los valores apuntados 
antes en las labias Ib. I v Ib.2, puesto que dichas constantes no se encuentran 
definidas en Visual Basic .NET. A continuación liemos declarado la variable 
que contendrá el valor de la propiedad v definido ésta. Lo único deslacable de 
BorderStyle es el hecho de que al modificar el valor se invoca al método 
RecreateHandle(). 

No basta con usar Invalidate( ) para forzar la actualización visual del 
control. Invalídate ( ) lo único que hace es forzar la generación de un evento 
Paint, pero la modificación de los estilos de un control solo se produce, según 
se ha dicho va antes, en el momento de la creación. Llamando a Recreate¬ 
Handle ( ) conseguimos la destrucción y recreación del control, lo cual implica 
la recuperación de los estilos de la propiedad CreateParams. I sla deberemos 
redefinirla dejándola como sigue: 


Protected Overrides ReadOnly Property 

CreatePararas ( ) As C’reaLePararas 

Get 

Dira Parámetros As CreateParams ^ MyBase. CreateParams() 

Select Case FBorderStyie 

Case BorderStyle.FixedSingle 

Parametros.Style ~ Parámetros.Style Or WS_BORDER 
Case BorderSlyle.Fixed3D 
Parámetros.ExStyle * _ 

Parametros.ExStyle Or WS_EX_STATICEDGE 

End Select 

Return Parámetros 

End Get 
End Property 


Líjese en que no asignamos directamente el estilo deseado al miembro Style 
o ExStyle, según proceda, de CreateParams, sino que lo añadimos median 
te el operador logico Or. De esta forma preservamos los valores que pudiese 



haber asignado la clase Control en su propia implrmenlaeión de la propie¬ 
dad. lil resultado, Iras estos cambios, sera una versión del control en la cual 
podemos personalizar el tipo de borde que aparece alrededor l .n la figura 16.3 
puede ver tres controles Flecha en el interior de un formulario, uno sin bor¬ 
de. otro con un borde simple y el tercero ron un borde tridimensional habitual 
en los controles estáticos que no pueden lomar el foco de entrada 



Figura 16.3. El mismo control con diferentes tipos de borde 


Ocultación de propiedades 

Nuestro control no esta diseñado para tomar c*l foco de entrada, de hecho 
no puede lomarlo v por ello hemos usado como base la clase Control v no 
otra de las citadas pre\ lamente Incluso podemos indicarlo \ isualmente usan¬ 
do el borde tridimensional que acabamos de añadir en el punto anterior. A pe¬ 
sar de todo, en la ventana Propiedades siguen apareciendo propiedades como 
TabStop y Tablndex, relacionadas precisamente con el acceso al control me¬ 
diante el labulador. 

Ya sabemos que podemos controlar la aparición de una propiedad en la 
ventana Propiedades mediante el al ributo System. ComponentModel. Brows- 
able. I 1 problema es que la propiedad va ovaste en la clase base v, además, en 
este caso concreto no son propiedades Ove rr.¡dable, es decir, que podamos 
redefmir. 

Siempre tenemos la opción, sin embargo, de ocultar un miembro de una cla¬ 
se base definiendo otro idéntico y utilizando la palabra clave Shadows. 





Dado que lo que no nos interesa, para el control Flecha, es que aparezcan 
las propiedades TabStop y Tablndex, podríamos ocultarlas añadiendo el có¬ 
digo siguiente a nuestra propia clase. 

(?»- . . i jj'-. a .»> t ••«M • ■ •%(! • 1 1 ■ . . «<• i » 

<Sy s ten». Componen tModel. Browsabl e ( False ) > _ 

Public Shadows ReadOnly Property Tablndex () As Integer 
Get 

End Get 
End Property 


~ j -b - i * ii'• * • » • »t>» . • i .. • *. • i .. 

■ t- «• Mi. - '(fa <&••»( • |1¡%' .*,1 .(II 

<System.ComponentModel.Browsable(False)> 

Public Shadows ReadOnly Property TabStop () As Boolean 
Get 

End Get 
End Property 

Las hemos definido como propiedades solo de lectura y, ademas, la imple- 
mentación está vacía. Lo más importante, sin embargo, es que hemos aplicado 
el atributo Browsable (Fa lse ), de forma que estas propiedades va no apare¬ 
cen en la ventana correspondiente- 

Eventos de cambios en propiedades 

Tablndex y TabStop no son las únicas propiedades no útiles con que 
cuenta el control Flecha. En este momento tampoco son útiles propiedades 
como Text y Font. por poner un ejemplo, ya que el control tan sólo muestra 
una línea en su interior. Podríamos ocultarlas también, pero en lugar de hacer¬ 
lo vamos a aprovecharlas para mostrar un título encima de la Hecha. Lo único 
que tenemos que hacer sera añadir la sentencia siguiente al final del método 
OnPaint( ) que habíamos redefinido previamente. 

©.Graphics.DrawStringí Me. Text, Me. Font, Brushes.Black, 0, 0) 

Tras compilar de nuevo la biblioteca que contiene el componente comprue¬ 
be su comportamiento- Si modifica la propiedad Font verá que, de inmedia¬ 
to, el texto que muestra el control se actualiza convenientemente. No ocurre lo 
mismo, kí n embargo, cuando se modifica la propiedad Text Está claro que la 
implemenlacion que se hace en Control de la propiedad Font cuenta con una 
llamada a Inval idate ( ), mientras que la asignación a la propiedad Text 
simplemente conserva el nuevo valor. 

La mayoría de las propiedades de la clase Control generan un evento cada 
vez que se modifica su valor, facilitando así la actualización de los elementos 
dependientes que pudieran existir. En realidad desde el apartado Set de la 
propiedad lo que se hace es invocar a un método cuyo nombre sigue el patrón 



OnPropiedadChanged( ), sustituyendo Propiedad por el nombre de la pro¬ 
piedad que corresponda. Dichos métodos son protegidos, de tal forma que el 
usuario de un control tendría que utilizar forzosamente el evento TextChanged, 
EnabledChanged, FontChanged o, en definitiva, aquél que corresponda a la 
propiedad que desea controlar. I n nuestra clase de control, sin embargo, tene¬ 
mos acceso a los miembros protegidos y, por tanto, podemos redefinirlos. 

Para conseguir que una modificación de la propiedad Text actualice la vi- 
suali/.ación del control, haciendo que éste muestre siempre el título adecuado, 
tendríamos que añadir el código siguiente a nuestra clase: 

*■ >* * • * r► r*• *.»::» • * * • •> 

• i ^ rM.j « • < 

Protected Overrides Sub OnTexLChanqed( 

ByVal e As System.EventArqs) 

MyBase.OnTextChanged(e) 

' v « •’*»’» ' •»- l ’.C-J *M »•' » ’ 

Invalídate!) 

End Sub 

Primero invocamos al método OnTextChanged ( ) de la clase base, de tal 
forma que sea ésta quien se encargue de generar el evento correspondiente, en 
este caso TextChanged. Después llamamos a Inval idate ( ) para forzar la 
actualización visual del control que, a partir de ahora, tendrá un funcionamien¬ 
to más adecuado. 












Nuevas propiedades y eventos 

Además de modificar el comportamiento por defecto de l«i clase Control 
redefiniendo y ocultando miembros, que es, básicamente, loque hemos hecho 
hasta ahora, lógicamente también podemos ampliarlo añadiendo miembros 
nuevos Ya hemos definido en la clase Flecha una nueva propiedad, llamada 
BorderStyle y. de igual forma, podemos implementar nuevos métodos \ 
eventos. El procedimiento lo conocemos sobradamente. 

En su diseño actual nuestro control siempre dibuja una flecha a ambos ex¬ 
tremos de una linea recta. Podríamos habilitar las propiedades necesarias para 
que esto aspecto fuese configurable y el usuario del control pudiese elegir lo 
que desea ver en los extremos, de igual forma que elige el color o el tipo de le¬ 
tra del titulo. 

Tendríamos que definir dos propiedades, StartCap y EndCap, v de paso 
facilitar también los eventos correspondientes a cambios en su valor. l£l código 
que tendríamos que añadir a nuestra clase sería el mostrado a continuación. 


Prívate FStartCap As Drawinq.Drawing2D.LineCap - 
Drawing.Drawing2D.LineCap.ArrowAnchor 
Private FFndCap As Drawing.Drawing2D.LineCap - 
Drawing.Drawing2D.LineCap.ArrowAnchor 


<.Category ("Cambios de propiedad" )> _ 

Public Event StartCapChanged As Eveni.Handler 
<Cateqory ( "Cambios de propíedad*') > __ 

Public Event EndCapChanged As EventHandler 


<CaLeqory("Apariencia") , _ 

Description("Establece el elemento de inicio de linea"), 
Defau 11. Va lúe (Drawing . Drawi ng2D. LineCap. ArrowAnchor ) > _ 
Public Proper ty StartCapf) As Drawing.Drawing2D.LineCap 

Get 

Return FStartCap 
End Get 

Set(ByVal Valué As Drawinq.Drawing2D.LineCap) 

FStartCap « Valué 

OnS tar tCapChanged (Evem.Arqs. Empty ) 

End Set 
End Property 


Protected Sub OnSta itCapChangediBy Va 1 e As Sy»tem.EventArg») 

RaiseEvent StartCapChanged( Me , e) 

Inva 1 ida te() 

End Sub 



<Category("Apariencia"), 

Descnption( “Establece el elemento de fin de línea" ) , 

Defau1 t Valué(Drawinq. Drawi ng2D.LineCap.ArrowAnchor)> _ 

Public Property EndCap() As Drawlng.Drawing2D.LineCap 

Get 

Return FEndCap 
End Get 

Set(ByVal Valué As Drawinq.Drawing2D.LineCap) 

FEndCap = Valué 

OnEndCapChanged{EventArgs.Empty) 

End Set 
End Property 

Protected Sub OnEndCapChanged< ByVal e As System.EventArgs) 

RaiseEvent EndCapChanged(Me, e) 

Inval idate() 

End Sub 

1 lomos seguido el mismo esquema usado en la propia clase Control, invo¬ 
cando desdo el apartado Set de las propiedades a los métodos OnStartCap- 
Changed( ) y OnEndCapChanged ( ) F.stos métodos son protegidos, accesibles 
para cualquier i laso que pudiera derivarse de Flecha. En su interior se genera 
el evento de cambio de valor v se invalida el control para forzar la actualización. 

Do manera análoga, puede mejorar el control implementando una propie¬ 
dad que nos permita definir el grosor de la linea o el tipo de trazo, asi como su 
orientación que, ahora mismo, siempre es horizontal. 



Figura 16.5. Ahora podemos elegir el elemento que aparecerá en los exiremos 
de la linea 















Interceptar loe eventos de teclado y ratón 

La clase Control se encarga de procesar, como se indicó al principio, lodos 
los mensajes que recibe del sistema y de dispositivos como el teclado v el ra¬ 
tón. t.n el caso de estos dispositivos, lo habitual es que genere el evento corres¬ 
pondiente, de forma que el usuario del control pueda responder adecuadamente 
a las pulsaciones de loriado o botones del ratón. A veces, no obstante, podemos 
necesitar incluir en nuestro control código asociado a dichos eventos. 

Ll mecanismo es idéntico al descrito antes para los eventos de notificación 
de cambios en los valores de las propiedades. Rxisle un método protegido, que 
podemos sobrecargar, encargado de generar los eventos de teclado y ratón. 
Bastaría con añadir el código siguiente a nuestra clase para conseguir que cada 
ve/, que se pulse sobre un control Flecha, con el botón principal del ratón, se 
inviertan los valores de las propiedades StartCap y EndCap, lo cual tendrá 
un reflejo inmediato en la apariencia en caso de que dichas propiedades indi¬ 
casen distinto tipo de elemento. 


i. •« e* f * v - - i »!■* 

Protected Overrides Sub QnMouseUp( 

ByVal e As System.Wíndows.Forme.MouseEventArgs) 

* •• * hit'"' • H J *i* 

If e.Button = MouseButtons.Left Then 

' • r * r r.»< ,1 . •« ••*,»■» • *• • 

Din» Extremo As Drawing. Drawing2D. LineCap = StartCap 
StartCap » EndCap 
EndCap = Extremo 

End If 

• «• . »w ,i r r+* r»- .i *■«* <• • «* 

MyBase.OnMouseUp(e) 

End Sub 

De manera análoga podríamos interceptar cualquier otro evento de teclado 
o ratón, tan sólo hay que redefinir el método apropiado y, como sabe, el editor 
de código nos ofrece en la lista desplegable que aparece en la parte superior 
derecha una lista de todos esos métodos. 


Controles compuestos 

Ll control que hemos desarrollado como ejemplo en los punios anteriores, 
Flecha, hereda gran parte de su funcionalidad de la clase Control, lo hemos 
visto, pero no utiliza otros componentes para efectuar su trabajo. Ilav ocasio¬ 
nes en las que mas que desarrollar un control totalmente nuevo, como es el 
caso de Flecha, nos interesará componer un control complejo a partir de otros 
ya existentes. F.n estos casos la base adecuada es UserControl que, como 
vamos a experimentar de inmediato, cuenta con diseñadores que facilitan su 
desarrollo hasta situarlo al mismo nivel que una interfaz de usuario basada en 
un formula rio. 



La clase UserControl, como va sabe, está derivada dcContainerControl 
que, a su vez, deriva de ScrollableContro 1 que, a su vez, tiene como base a 
Control. Esto significa que todo lo que hemos aprendido hasta ahora nos si¬ 
gue siendo útil, es más, podríamos decir que indispensable, a la hora de crear 
controles de usuario o derivados de UserControl. Esta clase añade los elemen¬ 
tos necesarios para hacer posible la navegación por los componentes hijo que 
contiene, gestionando el foco de entrada adecuadamente. 

Veamos de manera rápida cómo crear un control de este tipo basándonos 
en un sencillo ejemplo. Comenzaremos añadiendo a la misma biblioteca donde 
tenemos a Flecha un control de usuario, utilizando para ello el cuadro de diá¬ 
logo que aparece en la figura 16.6. En la lista de la derecha hemos elegido el 
elemento Control de usuario, mientras que en la parte inferior hemos introdu¬ 
cido el nombre del nuevo control: EuroCalc. 



Figura 16.6. Añadimos un control de usuario a la biblioteca actual 
de controles Windows 

De inmediato aparecerá un diseñador similar «iI utilizado para los formula¬ 
rios Windows, aunque en este caso no existe un borde ni tampoco una barra 
donde aparezca el título y los botones de cierre, maximizado y minimizado. En 
dicho contenedor podemos insertar los controles que deseemos, utilizando el 
Cuadro de herramientas, personalizándolos mediante la edición de propieda¬ 
des y asociación de código a sus eventos. 

En resumen, podríamos decir que el trabajo es idéntico al del desarrollo de 
una interfaz de usuario, pero el resultado no es una aplicación sino un control 
reutilizable. 

Observe la figura 16.7. Corresponde al control que hemos creado antes tras 
añadir dos cajas de texto y dos etiquetas, que liemos personalizado modifican¬ 
do propiedades como Text, TextAlign y Anchor. La apariencia final es la de 
una calculadora con doble pantalla, como las que se han hecho tan populares 
con la disponibilidad del euro. 




Figura 16.7. Diseñamos el control de una forma visual 


I I imit o código di* este control eslora asociado al exento KeyPress do las 
dos cajas de texto. Lomo puedo vera continuación, comprobamos si se ha pul¬ 
sado Intro. caso en el cual haiemos el cali tilo de conversión v asignamos el 
resultado a la otra caja de texto. Nos servimos del método Math. Round( ) pa 
ra redondear el resultado sin decimales, en el caso de las pesetas, o con dos de¬ 
cimales, en el caso Je los euros. 


Private Sub TexLBoxi_Key Preas ( ByVal st-ndei As Object , 

ByVal e As System.Windows.Forros.KeyPresMEventAiqs) 

Mandles TextBoxl.KeyPress 
If e.KeyChar » vbCr Then 

Texi_Box2. Text Mat h . Kound ( CDbl( Test Box 1 . Text.) * lbb.3Bb) 

End If 
End Sub 

Private Sub Texi.Box2__Kcy Press ( ByVal sendei As Object, 

ByVal e As Sys i.em . Windows . Forros . KeyPressfc!ven I Arqs ) 

Handles TexLBox2.KeyPress 
If e.KeyChar ~ vbCr Then 

Tex t Box 1. Text Math. Round ( CDbl (Text Box 2 . Text.) / 1 66 . 38b, 2 ) 

End If 
End Sub 

No tenemos que hacer nada más Basta cotí compilat de nuevo la biblioteca 
en la que se encuentran nuestros controles v, después, insertar un EuroCalc 



en un formulario. Para comprobar el funcionamiento tendrá que ejecutar el 
provéelo, va que este nuevo control no incorpora propiedades que permitan 
asignar o recuperar los valores en la tase de diseño. Lin la figura 16.8 aparecen 
dos controles EuroCalc en funcionamiento. 



Figura 16.8. Nuestro nuevo control en luncionamiento 

Propiedades de componen tes contenidos 

Como puede ver en el control EuroCalc. las propiedades v. en general los 
miembros de los controles contenidos en el no son directamente accesibles des¬ 
di’ fuera. Para hacerlos visibles tendríamos que codificar miembros que lacili 
lasen el acceso a los miembros de los controles contenidos. Por ejemplo, suponga 
que desea dar al usuario la posibilidad de modificar el contenido de cualquiera 
ile las dos cajas de texto contenidas en el control EuroCalc. de tal forma que 
pueda efectuar una asignación en la laso de diseño o bien mediante codigo. t an 
solo tendríamos que añadir las dos propiedades siguientes: 


<Fe f reshProper t i es < Reí reshProper i. i es . Repaint) » 

Public Property Euros() As Double 
Get 

Return Text BOX 1 - Tejl'l 

End Get 

Set(ByVal Valué As Double) 

TexLBoxl.Text = Valué 

Text Box2 . Text Ma Lh . Round ( CDbl (’l'ex t Box I . Text ) * lbb.JBb) 

End Set 
End Property 


<P.ef reshProper t i es ( Re f reshPropei t. i es . Repa int ) 

Public Property Pesetas! ) As Double 




Oet 

Roturo TextBox2.Text 

End Get 

Set(ByVa1 Valué As Double) 

TextBox2.Text * Valué 

TextBoxI.Text * Math.Round ( CDbl{ TextBox2.Text) / 166.386, 2) 

End Set 
End Property 

Como se aprecia en la figura \b. 9, ahora es posible la modificación del con¬ 
tenido de las cajas de texto desde la ventana Propiedades, posibilidad que an¬ 
tes no teníamos. 



Figura 16.9. Editamos las nuevas propiedades del control EuroCalc 


En lugar de definir una propiedad en EuroCalc para cada propiedad de 
los controles que Jo constituyen, lo cual nos ofrece un cierto control sobre los 
elementos a los que tendrá acceso el usuario del componente, podemos definir 
una propiedad que ofrezca acceso directo a todo el control. Podríamos imple- 
menta r dicha propiedad asi: 

Public ReadOnly Property EurosCon t.rol ( ) As TextBox 
Get 

Return TextBoxl 
End Get 
End Property 

1 a propiedad es solo de lectura, de forma que no pueda asignar a EurosCon- 
trol una caja de texto diferente a las que ya hay insertadas en EuroCalc. Al 




devolver una referencia a esa caja de texto, sin embargo, estamos permitiendo 
el acceso a todos sus miembros. En la ventana Propiedades la propiedad Euros- 
Control aparece con una marca que indica la existencia de subpropiedades, 
en realidad la lista de propiedades del TextBox. De esta forma podemos mo¬ 
dificar la alineación, tipo de letra, etc. En la figura 16.10 puede ver la lista de 
propiedades y subpropiedades. 



Figura 16.10. Las propiedades de la caja de texto aparecen en la ventana 
Propiedades 


Nota 

Recuerde que puede servirse de los eventos PropiedadChanged para 
detectar el cambio de cualquier propiedad de la caja de texto y actuar en 
consecuencia. 


Otras bases para nuestros controles 

Las clases Control v UserControl no son las únicas que pueden usarse 
como base para crear nuevos controles. En realidad, podemos crear un control 
partiendo de cualquier clase existente en System. Windows . Forms, cualquier 
control que ya exista, independientemente de su simplicidad o complejidad. 
Usando las técnicas descritas en éste y el capítulo anterior podemos moditicar 










el comportamiento de cualquier control, añadiendo nuevas propiedades y even¬ 
tos, ocultando miembros, alterando su estilo, etc. 

Suponga que quiere crear un control que aparezca como una lista desplega- 
bledo la que el usuario pueda seleccionar una de las unidades de disco disponi¬ 
bles en el sistema. Seria absurdo crear toda la funcionalidad de una nueva lista 
desplegable partiendo de la clase Control. Tampoco necesitamos toda la fun¬ 
cionalidad de UserControl, aunque seria muy fácil insertar en el diseñador 
un ComboBox y aprovechar un evento para añadir los elementos. En nuestro 
caso, sin embargo, optaremos por derivar la clase del nuevo control directa¬ 
mente de ComboBox, que es la lista desplegable Corriente que encontramos en 
System.Windows.Forms. 

El código siguiente seria suficiente para obtener, en principio, la lista de 
unidades y facilitar su selección. Aprovechamos el constructor de la clase pa¬ 
ra recuperar esa lista, mediante el método GetLogicalDrives ( ) de la clase 
System. 10. Directory que estudiamos en un capitulo previo. También mo¬ 
dificamos el estilo de la lista, de tal forma que no sea posible teclear un texto. 
Por último, añadimos una propiedad, llamada Drive, que facilita el acceso a 
la unidad seleccionada. 

Imports System.Windows.Forms 

Imports System.10 


Public Class DriveComboBox 
Inherits ComboBox 


» • • 4 °* 

Public Sub New() 
MyBase .New( ) 


Me.DropDownStyle = ComboBoxSt y le . DropDownl. i s t 
Oim Unidad As String 
Me.Items.Clear {) 

For Each Unidad In Directory.GetLogi calDrives 
Me . I leras .Add(llnidad) 

Nex t 

Me.Text - Me.ltems(O) 

End Sub 


Public Property Drive() As String 
Get 

Return Me.Text 
End Get 

Set(ByVal Valué As String) 
Me.Text - Valué 

End Set 
End Property 
End Class 



En la figurd lñ. I I puede observar el aspecto del nuevo control. F.n la prác 
tica seria necesario añadir propiedades y eventos que controlasen la modifica 
cion de la propiedad Orive v, posiblemente, habría que ocultar propiedades 
como Text y DropDownStyle. Para todo ello ya cuenta con los conocimientos 
necesarios. 


- Formi 




EL* i 


1V> € 


*** Pll 



Figura 16.11. La lista de unidades del control DriveComboBox 


Puntos clave 


• Eos controles Windows pueden derivarse de múltiples clases, siendo las 
principales Control y UserControl 

• Cuando el control a desarrollar es simple, no compuesto de otros, v se en¬ 
carga de dibujarse a sí mismo en el contenedor, la base apropiada es la cla¬ 
se Control. 

• Para diseñar un control que esta compuesto de otros usaremos como base 
UserControl, clase para la que existe un diseñador prácticamente idén¬ 
tico al de los formularios Windows. 

• La clase Control dispone de un importante número de miembros protegi¬ 
dos, accesibles desde cualquier nuevo control que podamos desarrollar. 

• Rede!iniendo la propiedad solo de lectura CreateParams podemos alte¬ 
rar el estilo del control, utilizando para ello indicadores de bajo nivel pro 
píos del API de Windows. 

• Aprovechando los métodos protegidos de Control es posible responder 
<i eventos de teclado v ratón, delectar cambios en propiedades v dibujar 
el control cuando es necesario 

• l omando como base una clase de control va existente podemos alterar su 
comportamiento por detec to, por ejemplo extendiendo sus posibilidades 
mediante nuevos miembros. 




Resumen 


Al finalizar este capítulo hemos adquirido los conocimientos necesarios pa¬ 
ra desarrollar cualquier tipo de control para formularios Windows, controles 
que tienen una interfaz de usuario y aparecen visualmente en el contenedor. 
También hemos aprendido a aprovechar muchas de las características de Con¬ 
trol, clase que actúa como base de todos los controles del ámbito System. Win¬ 
dows . Forms. 

El diseño de controles compuestos es muy similar al existente en versiones 
previas de Visual Basic. Incluso la clase que actúa como base, UserControl, 
se denominaba igual entonces. La composición de estos controles resulta muy 
sencilla ya que, en definitiva, se trata de insertar otros controles y utilizarlos co¬ 
mo haríamos en cualquier aplicación. 

Para terminar este trío de capítulos, dedicados a la creación de componen¬ 
tes y controles, en el próximo abordaremos la creación de controles para formu¬ 
larios Web, controles que generan código HTML o están compuestos de código 
HTML. 
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Controles Web 


Do igual manera que podemos crear controles específicos para su uso en 
formularios Window s, también existo la posibilidad de crear controles para 
formularios Web, controles que. por la propia naturaleza do la aplicación a la 
que van destinados, resultan inuv distintos do los que hemos conocido en el 
capitulo previo. No hay mas que tener en cuenta que el control propiamente 
dicho se ejecuta en un servidor web, no en un cliente. No existe, por tanto, la 
posibilidad de acceso directamente a un área de dibujo. 

I os controles Web podemos clasificarlos básicamente en dos categorías, 
controles de servidor v fuigt'lcte. Los primeros, como vamos a ver a continua¬ 
ción, se desarrollan derivando de una cierta clase v escribiendo código, como 
los controles para Windows. Los segundos. \ospa$elct, en realidad son fragmen¬ 
tos de código HTML, a los cuales se les asigna un identiíicador que facilita su 
posterior reutilizacion. Unos v otros resultan interesantes. 

La cla5<5 Control y sus derivadas 

Todas las clases que nos interesan en este capitulo, de cara a crear nuestros 
propios controles web, se encuentran alojadas en el ámbito System. Web.Ul 
La que podríamos considerar raí/ de todas las demás, relacionadas con los 
controles, es Control. Aunque su nombre coincide con la clase Control de 
System. Windows. Forms, tenga en cuenta que son clases nuiv diferentes v 
que cada una está alojada en un ensamblado distinto \ un ámbito propio. 









La clase Control dispone de los elementos necesarios para contener a otros 
controles, así como la capacidad de dibujarse enviando al cliente, mediante un 
intermediario, el código HTML apropiado. Podríamos decir que crear un nue¬ 
vo control derivando de System. Web. UT . Control sería equivalente a tomar 
como base System. Windows . Forms . Control, tan sólo hav que redefinir un 
método, llamado Render ( ) en el primer caso y Paint( ) en el segundo, para 
definir la apariencia o contenido del control en su contenedor. 

Una de las clases derivadas de Control es LiteralControl. Aunque no 
es habitual derivar nuevas clases de ésta, dada su simplicidad, nada nos impi 
de hacerlo. Los controles de esta dase representan elementos de contenido que 
no necesitan ser procesados en el servidor, es decir, son elementos estáticos, 
que pueden mantenerse siempre en el documento enviado al cliente. 

Derivada directamente de Control, la clase WebControl es, a su ve/, base 
de la mayoría de controles web que tenemos a nuestro alcance en el Cuadro de 
herramientas, como Calendar, Button o TextBox. Lsta clase añade, a los 
miembros heredados de Control, propiedades que gestionan la apariencia 
del control, como BackColor, BorderStyle o Font., así como los métodos 
protegidos necesarios para personalizar el comportamiento desde clases que 
nosotros pudiéramos derivar. 

Por último nos encontramos con la clase UserCont.ro l. derivada de Tem- 
plateControl que, a su ve/., está derivada de Control. Al igual que ocurría 
con la clase UserControl de System . Windows . Forms, ésta se utiliza para 
crear controles compuestos de elementos va existentes, en cierta forma crean¬ 
do una página o documento que podrá insertarse como unidad indisoluble en 
la página web que vaya a enviarse al cliente. 


Desarrollo de un control simple 

Veamos cómo crear un control web simple derivándolo directamente de la 
clase Control. La finalidad de este control será simplemente la de introducir 
una firma en el documento, de tal forma que cada vez que ésta sea necesaria no 
habrá más que tomar el control e insertarlo en la pagina. I o único que debe 
mos hacer es redefinir el método Render ( ) heredado de Control, usándolo 
para insertar el código HTML apropiado en el único parámetro que se recibe 
Inicie una biblioteca de clases e inserte en ella el código mostrado a conti 
n uación. 

Importa Syst em.ComponenHModel 
Importa Syat.em.Web.UI 


Public Claas fuma 
Inherits Control 


Protected Overrides Sub Render< 

ByVal writer As System . Web . III . HtmlTe.x tWr i ter) 



* .i 


.j»í» -a.-t 


writer.Write("<pre>(c| 1997-2002 <b>Torre de Babel*/b>«/pre>") 

End Sub 

End Class 

lil parámetro que recibe el método Render ( ). cié clase HtmlTextWriter, 
dispone de un método Write( ) similar al de la clase HttpResponse que ya 
usamos en el capítulo dedicado a los íormularios web. Dicho método dispone 
de varias versiones sobrecargadas que aceptan distintos parámetros. En este 
caso nos limitamos a facilitar una cadena de caracteres con unas marcas 11 l'Ml 
y un texto. I ras compilar este componente v añadirlo al Cuadro de herramien¬ 
tas, pruebe a insertarlo en un formulario web. Lo primero que notará es que no 
puede colocarlo en una posición fija del formulario, a pesar de que si es posible 
hacerlo con otros controles, fisto se debe a que la clase Control, de la que he¬ 
mos derivado nuestro control, no facilita las propiedades necesarias para man¬ 
tener su posición y dimensiones. 

Posición, dimensiones y estilo 

Aunque podríamos añadir manualmente a nuestro control propiedades como 
Height, Width, Font y similares, lo cierto es que resulta mucho más fácil 
cambiar la clase base, que actualmente es Control, por WebControl- Esta 
clase está definida en el ámbito Sy s tem . Web . UT . WebCont ro 1 s, no en 
System. Web. UI, y es la base común de todos los controles existentes en dicho 
ámbito, en general todos los controles que tienen un proceso en el servidor. 

Sólo cambiando Inherits Control por Inherit WebCont rol s - Web- 
Control, y volviendo a compilar la biblioteca en la que se encuentra el con¬ 
trol, podrá ver que el comportamiento del control cambia de inmedialo. Ahora 
si que podremos colocarlo en la posición que nos convenga, como cualquier 
otro de los controles disponibles en el Cuadro de herramientas, gracias a la 
funcionalidad heredada de WebControl, En la figura 17.1 puede ver el control 
insertado en un formulario web. 

En este momento el control no utiliza los valores alojados en la mavoría de 
las propiedades heredadas de Control. Así, podemos modificar aspectos como 
el color del texto o el tamaño del tipo de letra sin que Firma adecúe conve¬ 
nientemente el código generado que, en definitiva, definirá su aspecto en el 
documento 111 MI Lo único que tenemos que hacer es escribir el código apro¬ 
piado, dejando el método Render ( ) como aparece a continuación: 

Protected Overrides Sub Render{ 

ByVal wnter As System. Web. UI .HtmlTextWr i ter) 

r j ' T ai \i*r •• t \»o . . * . c* • v ai 1 .; • • j a p* 

í*«? «.*•«• .'O I ! O 

writer. Wr ite("<fonfc color*" Me . ForeCo lor . ToStr ing _ 

" size** " & Me . Font. Size . ToStnng L ">*') 
writer.Wri te ( 

”<pre>(c) 1997-2002 <b>Torre de Babei</b></pre></tont>"> 

End Sub 
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Figura 17.1. Aspecto de nuestro control insertado en un formulario web 

Como puede ver, recuperamos los valores de las propiedades ForeColor v 
Font . Size de nuestro control para componer lina etiqueta <font> de IITMI 
con los atributos necesarios. Ahora es posible personalizar tanto el color como 
el tamaño del control. 

De manera análoga puede implementarse también el uso del resto de las 
propiedades. 


Adición de nuevos miembros 


Lógicamente, podemos añadir a cualquier nueva clase de control Web los 
miembros que necesitemos: propiedades, métodos, eventos v miembros de 
datos. El sistema es exactamente el mismo que ya conocemos, incluyendo la 
asociación de atributos con esos miembros o con la propia clase para determi¬ 
nar cuál es la propiedad o el efecto por defecto. No necesitamos, por lo tanto, 
aprender nada nuevo. 


Nota 

Cuando las propiedades o métodos afecten a la apariencia del control, que 
es lo habitual, será entonces preciso actualizar la implementación del mé¬ 
todo Render(). 










Figura 17.2. Aspecto del control tras modificar el color y tamaño de letra 


Suponga que, en ocasiones, quiere preceder la firma que genera el control 
Firma por la lecha e, incluso, la hora actual en el servidor, listos elementos, no 
obstante, no aparecerán en todas las paginas, por lo que deberá añadir sendas 
propiedades que le permitan configurar la aparición o no de esos elementos. 
Además de las propiedades, como acaba de anotarse, deberá modificar el me 
todo redefinido Hender ( ) C on todo, nuestra clase de componente podría que 
dar como sigue: 

Importa System.ComponentMode 1 
Imports System.Web.UI 


Public Clase Firma 

Inherits WebControls.WebContro1 


Prívate F=*ShowDate As Boolean 
Prívate FShowTime As Boolean 


<Category("Apariencia” ) , 

Description("indica si debe mostrarse la lecha i, 
Defan]tValúe(False)> 

Public Property ShowDaiet > As Boolean 
Get 

Return FShowDate 





End Get 

Set(ByVal Valué Ab Boolean) 
FShowDate * Valué 
End Set 
End Property 


*' ,<c l ¿s . i ..*v* •» ^ 

<Category("Apariencia" ) , 

Deser iption("Indica si debe mostrarse la fecha"), 
Deí au 1 t.Value ( Falae ) > __ 

Public Property ShowTime{) As Boolean 
Get 

Return FShowTime 
End Get 

Set(ByVal Valué As Boolean) 

FShowTime - Valué 

End Set 
End Property 


Protected Overrides Sub Renden 

ByVal writer As System.Web.UI.HtmlTextWriter) 

t. «i • • * .9 y > '* . ,f|T * . . ¿ » 


writer.Write( "<font color-” t. 

Me.ForeColor.ToStrinq & " size= " 
i. Me.Font.Size.ToString t* "><pre>" ) 

If FShowDate Then 

writer . Wr i te( Date. Now . ToLongDa test, r ing ) 
If FShowTime Then 
wr i ter . Wr i t.e ( " — ■' ) 

Else 

writer . W r it e ( M < b r >") 

End If 
End If 


If FShowTime Then 

wr iter. Write( Date. Now .ToLongTimeStr ing k "<br>") 

End Lf 


writer.Write( 

“<center>( c) 1997-2002 <b>Torre de Babe1</b>< /center> ") 
writer.Wri te("</ pt ex/ font>") 

End Sub 
End ClasB 

Iras este cambio, y como se ve en la figura 17.3, podrá activar o desactivar 
la vi su al i/ación de la fecha y hora simplemente modificando una propiedad. 


la c\aee HtmlTextWriter 

Hasta ahora, en los ejemplos previos, tan sólo nos hemos servido del meto 
do Write( ) del parámetro recibido, un parámetro que pertenece a una clase. 



HtmlTextWriter, en la que tenemos a nuestra disposición multitud de ele¬ 
mentos útiles que nos permiten componer la salida que debe enviarse al cliente 
sin necesidad de saber HTML. 



Lo primero que encontramos en la clase HtmlTextWriter son una serie de 
constantes que nos facilitan ciertos caracteres especiales que, siendo de uso ha¬ 
bitual en la composición de código 1ITML, no son habituales o resultan difíci¬ 
les de incluir como literales desde nuestro código Visual Basic. Algunos de esos 
caracteres son las dobles comillas, los símbolos de apertura y cierre de marca 
IITML o el carácter de tabulación. Estas constantes son compartidas, lo cual 
significa que podemos usarlas directamente como HtmlTextWr i ter . Default- 
TabString o HtmlTextWr i ter. Doub 1 eQuoteCha r, por poner un ejemplo. 

Para la inclusión de marcas y atribuios esta clase dispone de los métodos 
WriteBeginTag(). WriteEndTag( ), WriteAttribute() yWriteStyle- 
At tribu te ( ). Su uso hace innecesaria la codificación manual de marcas como 
<font> o <center>, usadas en nuestro ejemplo. También existen enumera¬ 
ciones que representan a la mayoría de marcas más habituales, así como a los 
atributos de estilo. 

Podríamos conseguir exactamente el mismo resultado que ya teníamos con 
esta nueva versión del método Render( ): 

Protected Overrides Sub Hender( 

ByVal wii ter As Sy s tem . Web. UT . H» m 1 Tex t_Wr l t er ) 




wr i t er. Wr i t eBeg i n'l'ag ( " í orí t " ) 
wnter . Wr iteAt tribute ( "color", 

Drawinq. Colar'l’rans I at or . ToHtmi { Me . ForeCol or ) ) 
wnter. Wr i teAt tribu te < ’*s v?.e" , Me . Font. Si ze. ToSt. n nq ) 
writer.WriteEndTag( " fon l" ) 
wnter. Wr iteFul lBeg i riTag ( "pre" ) 


If FShowDate Then 

wr i ter . Wr i te ( Date . Now . Tor.ongDateSt r ing ) 
If FShowTime Then 
wr iter.Wntef " - * ) 

Else 

writer.Wri te Fu1IBeginTag("br") 

End If 
End If 


If FShowTime Then 

wnter . Wi i te ( Date . Now . ToLongT i meSlr i nq ) 
wr iter . Wri t eFu 11 BegiriTag ( " br " ) 

End If 


wr iter.WriteFu 1 I Beq i n'l'ag ( "ceriter" ) 
wr i ter.write ("(c ) 1997-2002 ") 

writer.WriteFu11BeginTag("b") 
writer.Write("Torre de Babel") 
wri ter.Writ eKndTag("b") 
wr i t er . v¡i i teRndTag ( "center " ) 
writet.Wi i teEndTag ( "pre " ) 

End Sub 

Observe que utilizamos el método Wri teFullBeg i nTag ( ) pata todas las 
marcas que no cuentan con atribuios, mientras que nos servimos de Write— 
Beg i nTag ( ) para marcas que, como font. van acompañadas de dichos ele¬ 
mentos. El código tiene más apariencia de código Visual Basic v menos de 
código í I í ML. 

Incluso cabria otra versión de Render( ) en la que su st i luyésemos Lis lla¬ 
madas a Wr i teBeginTag { ), Wr iteAttribute ( ) y WriteEndTag ( ) por 
RenderBeg i nTag ( ).AddAttribute{ ) v RenderFndTag( ), respectivamente, 
sustituyendo las cadenas font. color v similares por constantes que son 
equivalentes y forman parte de enumeraciones predefinidas. 

Controles compuestos 


Nuestros controles web también pueden estar compuestos de otros contro¬ 
les, en lugar de dibujarse a si mismos generando código HTML. I I desarrollo 



de estos controles, no obstante, no es visual sino que se implemento mediante 
código. A pesar de todo los requerimientos son simples y no requieren demasia¬ 
do esfuerzo. 

Lo primero que hay que hacer es añadir a nuestra clase la implementación 
de la interfaz INammgContainer. Dicha interfaz en realidad no dispone de 
ningún miembro, sirviendo sólo como una marca para identificara aquellos con¬ 
troles web que, a su vez, contienen otros. I a existencia de esta interfaz en un 
control pone en marcha un mecanismo de identificación que evitara conflictos 
entre los controles. 

A continuación tenemos que redefinir el método CreateChildControl s ( ), 
insertando en el todo el código que sea preciso para añadir y personalizar nues¬ 
tros controles. Éstos, finalmente, deberán ser añadidos a la colección de contro¬ 
les representada por la propiedad Controls. 

Básicamente es como si creáramos los controles de manera dinámica v. por 
tanto, estableciésemos mediante código sus propiedades y eventos en lugar de 
hacerlo usando un diseñador. 

Veamos con un simple ejemplo cómo podemos crear un control compuesto. 
Para ello vamos a crear de nuevo el control de conversión entre pesetas v euros 
que va desarrollamos en el capitulo anterior, pero en esta ocasión en versión 
Web. 

1:1 código mostrado a continuación seria el que tendríamos que añadir al 
módulo correspondiente al nuevo control. 

Importa System 

Importa System.web 

Importa System.Web.UI 

Importa System.Web.UT.WebConlrols 

Public Claa8 EuroCalc 
Inherita WebControl 

Implements lNamingContainer 


Private WithEventB Euros As New WebContro1s.TextBox() 
Private WithEventB Pesetas As New WebControls.TextBox() 


Protected Overrides Sub Crea! eChi ldCont.rols ( ) 

Euros . Aut.oPost Baek * True 
Euros.Text = "0“ 

Me .Controls.Add(Euios) 

Me. Cori trola . Add ( New I. i t era l Con t ro 1 ( M f <br> M ) ) 

Pesetas . AutoPost-Back * True 

Pesetas.Text - ”0 M 

Me .Contro is. Add (Pesetas j 

Me . Controls .Add( New Literal Cont.ro I ( **Pt.s<br> N > ) 

End Sub 



Private Sub EurosChanged( ByVal sendet As Object, _ 
ByVal e As EveniArgs) Handles Euros. Tex I.Changed 

Pesetas.Text » Math.Round{Euros.Texl * 166.386) 

End Sub 


Private Sub PesetasChanged( ByVal sender As Object, 

ByVal e As EventArgs) Handles Pesetas.TextChanged 

Euros.Text 3 Math.Round(Pesetas.Text / 166.386, 2) 

End Sub 

End Clase 

Observe que declaramos los dos controles más importantes, las cajas de tex¬ 
to, con la cláusula WithEvents. a fin de poder gestionar sus correspondientes 
eventos TextChanged desde un método a propósito para ello I lomos dado el 
valor True a la propiedad AutoPostBack de ambos controles, di* tal forma 
que cuando se produzca un cambio en su contenido, en el cliente remoto, ante» 
friáticamente se produzca una comunicación con el servidor para efectuar el 
cálculo y preparar la respuesta. 

rara insertar el contenido estático nos hemos servido de la clase Literal- 
Control, creando objetos con un símbolo de euro de pesetas seguido de una 
marca de separación. 

Por lo demás, no hay nada en el código que no conozcamos va Para com¬ 
probar el funcionamiento de este control no tiene más que inicial una nueva 
aplicación basada en formularios web. insertarlo \ ejecutar el provecto. I n la 
figura 17.4 puede verlo en funcionamiento. 



Figura 17.4. EJ control de conversión en funcionamiento 
en una pagina ASP.NET 





Paqelete 


Al diseñar una sede web completa, en la que existen infinidad de documen¬ 
tos, es habitual que ciertos elementos se repitan con frecuencia. Un ejemplo 
puede ser la cabecera o el pie de los documentos, donde suele incluirse infor¬ 
mación acerca de los derechos de autor, enlaces y directorios del lugar. Otro 
ejemplo podría ser un formulario de entrada de datos que se utilice en varios 
puntos. 

En lugar de introducir el mismo código HTML una y otra vez, para repetir 
esos elementos, con ASP.NET tenemos la posibilidad de convertir fácilmente 
dichas porciones de código en componentes. Éstos no son componentes de for¬ 
mularios Web, no aparecerán en el Cuadro de herramientas, sino elementos, 
conocidos como pagelets, que deben registrarse apropiadamente antes de ser 
usados. El mecanismo es realmente sencillo y el resultado es que tenemos un 
componente ASP.NET más, aunque definido por nosotros y usando sólo HTML. 


Nota 

En cierta forma un pagelet es como un control compuesto, si bien su desa¬ 
rrollo no se basa en la escritura de código Visual Basic .NET sino HTML. 
Estos controles no se alojan en bibliotecas compiladas, que pueden distri¬ 
buirse para su uso en aplicaciones Web. sino que se almacenan como texto 
y sólo pueden añadirse tras crear una aplicación web ASP.NET 


Creación de un pagelet 

Para ver cómo crearíamos un pagelet, nombre con el que se conoce a estos 
componentes, lo mejor es hacerlo directamente con un ejemplo. Supongamos 
que estamos creando una sede web para esta misma guía práctica que tiene en 
sus manos. En las distintas páginas podría verse la portada, obtener datos co¬ 
merciales, ver el índice de contenidos, etc. La parte repetitiva es que en todas 
esas páginas nos gustaría incluir una cabecera, y quizá también un pie, en el 
que aparezca resaltado el título de la guía y un enlace con la sede web de la 
editorial. 

Lo que haríamos sería añadir al proyecto un Control de usuario Web (véase 
figura 17.5) insertando en él el código LITML para definir la apariencia visual 
de esa cabecera. Este archivo lo guardaríamos asignándole la extensión ascx 
(ASP Component) y, en este ejemplo concreto, llamaríamos al archivo Cabece¬ 
ra, ascx. Su contenido sería el siguiente: 


cp> 

<font face="verdana" size= M 3 M xfont> 
<table bgcolor="yellow" width* M 100%"> 
<td> 

Programación con Visual Basic .NET 





< / td> 

<td> 

<a href 3 ”http://www.anayamu1tímedia.es"> 
<b>Anaya Mu 11. imedia</b> 

</a> 

</td> 

</table> 

</p> 


Agregar nuevo elemento - Pagelets 
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Figura 17.5. Añadimos al proyecto un control Web de usuario 

Observe que no hay nada especial en este código, tan sólo 11TML definien¬ 
do una tabla con dos celdas y unos ciertos atributos. Aunque no lo havamos 
hecho, en la práctica también es posible usar componentes de servidor ASP.NET 
en ti n pagflet. 


Nota 

Al crear el control de usuario, en principio se encontrará con una superficie 
de diseño idéntica a la de un formulario Web. Acceda a la página de código 
HTML para añadir el contenido anterior. 


U 50 á& un ^agelet 

Lo que tenemos en este momento en el archivo Cabecera . ascx es, simple¬ 
mente. un fragmento de código HTML, nada más. Para convertir ese fragmen¬ 
to en un componente ASP.NET tendremos que usar la directiva <%@ Register 
de ASP.NET facilitando como parámetros un prefijo y un nombre para el com¬ 
ponente. asi como el nombre del archivo en que se encuentra el código, listo lo 
haríamos a! inicio de cada documento ASP.NET donde vayamos a utilizar el 
pagclet. 









Un ejemplo sería la línea siguiente añadida al principio del modulo Web- 
Forml . aspx de cualquier proyecto web: 

<1* Register TagPref ix= "PControl " 

TagName* "Cabecera" Src® "Cabecera . ascx" 

F.n este caso hemos asignado al componente el prefijo PControl y el nom¬ 
bre Cabecera. Esto significa que a la hora de iiu luirlo en nuestro documento 
ASP.NET usaríamos la referencia PControl:Cabecera, de forma análoga a 
como usamos la referencia asp:Calendar para incluir un calendario ASP.NET 

Nos bastaría con añadir el piíyc/r/ donde nos interese, por ejemplo antes y 
después del formulario del ejemplo anterior, usando la siguiente linea: 

<PControl ¡Cabecera runa t-"server" 

ID "Cabecera*?" ÑAME "Cabecera?" /> 

El diseñador do formularios Web mostrará el código introducido, haciendo 
referencia al componente, tal como se muestra en la figura 17.b. El componente 
aparece como un rectángulo en el que se indica que es un control de usuario 
Podemos colocarlo donde nos interese. Al ejecutar el provee to, ese componen¬ 
te generará la cabecera y el pie que puede ver en la figura 17.7. Nos ahorramos 
bastante trabajo, especialmente si dicha cabecera v pie deben incluirse en todos 
los documentos de nuestra sede web. 



Figura 17 . 6 . Aspecto del pagelet en el diseñador de formularios Web 

















tomaremos como base a System. Web .UI. WebControl s . WebCon trol 
en lugar de partir directamente de Control. 

• Los controles web que no contienen a otros generan su apariencia en el 
formulario, la pagina web que después se envía al cliente, redefmiendo la 
implementación por detecto del método Render( ). 

• Si el control está compuesto de otros el método a redefinir es Create- 
Chi ldControls( ), creando todos los controles hijo y añadiéndolos a la 
colección Controls. 

• Usando las propiedades y métodos de la clase HtmlTextWriter no es 
necesario introducir manualmente todas las marcas y atributos HTML 
para generar una cierta apariencia, ya que parte del trabajo está automa¬ 
tizado. 

• También podemos crear controles compuestos de otros elementos utili¬ 
zando sólo v exclusivamente 11TML. A estos controles se les conoce como 
/wyjWe/s o controles de usuario web 

Resumen 


Lo aprendido en este capítulo le servirá como base para comenzar a desarro¬ 
llar sus propios controles web, campo amplísimo sobre el cual podrían escri 
birse cientos de páginas. Lo fundamental es que sabe, básicamente, los recursos 
que tiene a su alcance. Al diseñar una nueva aplicación basada en formularios 
web puede utilizar pagelefc para automatizar la inserción de elementos repe¬ 
titivos, dejando el diseño de controles independientes, alojados en su propia 
biblioteca, para aquellos casos en los que el control pueda serle útil a otros pro¬ 
yectos o, incluso, pueda servir a terceros. 

Recuerde que todo lo aprendido en capítulos previos sobre orientación a 
objetos, componentes y atributos es aplicable también a los controles web que. 
al fin y al cabo, no son más que clases de objetos especializados. 
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I 

Creación 

de servicios 
Windows 


No todas las aplicaciones que se ejecutan en Windows lo hacen de manera 
interactiva, siendo iniciadas y controladas por un usuario corno es lo habitual 
en los tipos de proyecto desarrollados en capítulos previos. Existen aplicacio¬ 
nes que no cuentan con una interfaz de usuario, es más, no necesitan que se ini¬ 
cie una sesión para efectuar su trabajo que, por regla general, queda en segundo 
plano sin interferir con el uso cotidiano que pueda hacerse del sistema. 

La creación de servicios Windows requiere que el programador siga unas 
ciertas reglas en su desarrollo, reglas que no era posible alcanzar con versiones 
previas de Visual Basic, de forma que la creación de este tipo de proyectos que¬ 
daba tuera de nuestras posibilidades, siendo necesario recurrir a otras herra¬ 
mientas. Visual Basic .NET, por el contrario, no sólo tiene la capacidad necesaria 
para crear servicios Windows sino que, además, cuenta con unos asistentes que 
realizan gran parte del trabajo, simplificando considerablemente el nuestro. 

Nuestro objetivo, en este capitulo, es conocer las clases que están implica¬ 
das en el desarrollo de servicios Windows, su instalación y desinstalación y su 
control: inicio, pausa, detención, etc. Nos serviremos de un ejemplo simple pe¬ 
ro demostrativo que, además, nos servirá también para conocer nuevos servi¬ 
cios de la plataforma .NET, concretamente los relacionados con la comunicación 
mediante socket $. 








Esquema general 

Antes de ponernos manos o la obra, conociendo con detalle las clases que 
necesitamos y poniéndolas en práctica para desarrollar nuestro primer servi¬ 
cio, vamos a hacer un recorrido general por el proceso de desarrollo, instala 
cion v control de un servicio, lina primera aproximación que nos permita tener 
una visión global sobre este tema. 

Podemos implementar como servicio Windows cualquier aplicación que. 
ejecutándose sobre dicho sistema operativo, no necesite la intervención de nin¬ 
gún usuario. Los servicios desempeñan tareas que quedan en segundo plano 
pero que resultan imprescindibles en muchos casos. SQL Server, por poner un 
ejemplo, es una aplicación que so ejecuta como si fuera un servicio de la! forma 
que cualquier programa, sin actuación explícita sobre SQL Server, puede acce¬ 
der a una base de datos y trabajar con la informal ion que contiene lis {hilcnict 
Information Serón), el servidor web incorporado en Windows ISÍT/2000/XP. es 
otro ejemplo de aplicación que funciona como servicio Windows. 

Para conocer v controlar el estado de los servicios podemos usar diversas 
herramientas de Windows. La más habitual es la utilidad Servicios que apare¬ 
ce en el Panel de control y que. en el caso de Windows XP, tiene Ja apariencia 
que puede verse en la figura 18.1. Fn la lista aparecen lodos los servicios insta¬ 
lados en el sistema, indicándose su estado v como se inician. AI seleccionar un 
servicio cualquiera, en la parte izquierda aparecen las opciones disponibles 
para iniciarlo, detenerlo, pausarlo o reanudarlo. 

Otra posibilidad es recurrir a la consola v utilizar el comando NET START 
para ver los servicios que hay en marcha, liste mismo comando, seguido del 
nombre de un servicio, lo inicia, mientras que NET STOP v el nombre de un 
servicio lo detiene. 

Fn la plataforma .NI T un servicio es cualquier aplicación que pone en eje¬ 
cución una clase derivada de System. ServiceProcess . Serví ceBase Di¬ 
cha clase cuenta con los elementos apropiados para que utilidades como las 
que acaban de describirse puedan interactuar con el servicio, permitiendo su 
inicio y detención. Fn el punto siguiente comenzaremos a estudiar esta clase \ 
veremos como utilizarla para construir nuestro servicio. 

también en el ámbito System. ServiceProcess encontramos las clases 
Servicelnstaller y Serv iceControl 1er. I a primera se utiliza para crear 
el instalador con que debe contar cada servicio, mientras que medíante la se¬ 
gunda es posible desarrollar utilidades para controlar servicios, al estilo di* 
Servicios del Panel de control 

I ras desarrollar un servicio, creando una nueva clase derivada de Servi- 
ceBase, obtenemos un modulo que no puede ejecutarse directamente, lis ne¬ 
cesario instalarlo para que aparezca en la lista de servicios del sistema v que 
sea el usuario quien ln inicie o detenga a demanda l'ara efectuar esa instala¬ 
ción utilizaremos la herramienta installutíl que acompaña a Visual Basic 
.NFT, herramienta que buscará una clase derivada de System .Confígura- 
t ion. Install. Installer para personalizar la instalación. I a misma utili 
dad nos servirá en caso de que deseemos desinstalar el servicio. 
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Figura 18.2. Uso del comando net start desde la consola del sistema 





Nota 


El desarrollo de servicios Windows es una posibilidad que no existe en la 
edición estándar de Visual Basic NET, por lo que si dispone de esa edición 
no encontrará los asistentes que van a mencionarse en el punto siguiente 
y seguramente tampoco encuentre la herramienta installutil. 

La c\aee ServiceBase 

Para que nuestra aplicación pueda considerarse un servicio deberá contar 
con una clase que esté, directa o indirectamente, derivada de ServiceBase, 
una clase que, como va sabe, está alojada en el ámbito System.Service- 
Process. Derivada directa de la clase Component, que conocemos de capítu¬ 
los previos, esta clase añade un conjunto de propiedades que determinan las 
operaciones de control que el usuario podra ejecutar sobre el servicio, asi como 
una serie de métodos que se ejecutarán cuando esas operaciones tengan lugar. 

I a propiedad ServiceName contendrá el nombre con el que se identificará 
el servicio, teniendo en cuenta que en un mismo provecto podemos tener múl¬ 
tiples servicios, ¡mplementado cada uno de ellos como una clase derivada de 
ServiceBase. Las propiedades CanStop, CanShutdown v CanPauseAnd- 
Continue indican si el servicio puede detenerse, liberarse, pausarse y conti¬ 
nuarse. respectivamente. Sólo la primera tiene, inicialmente, el valor True. 

Por regla general, las aplicaciones corrientes son cerradas por el propio 
usuario, o automáticamente, cuando el sistema se encuentra en ciertas i ircuns- 
lancia.s, como puede ser la ausencia de suministro eléctrico. Un servil 10 indica¬ 
rá, mediante la propiedad CanHandlePowerEvent, si esta preparado o no 
para responder a estas circunstancias, por ejemplo deteniendo su ejecución o 
pasando a algún otro estado. 

Creación del objeto que actúa como servicio 

I a aplicación que va a actuar corno servicio deberá contar con un método 
compartido llamado Main( ), como prácticamente cualquier otro tipo de aplica¬ 
ción. Desde ese método invocaremos al método Run( ) de ServiceBase tac i - 
litando como parámetro un objeto de la clase derivada de ServiceBase. de 
manera análoga a como pasamos un objeto derivado de Form al método Run( ) 
de la clase Application. I I esqueleto básico sería el siguiente 

Public Class MiClaseServicio 

Inherits System.ServíceProcess.ServiceBase 

Shared Sub Main() 

System.ServiceProcess.ServiceBase.Run(new MiClaseServicio) 

End Sub 




Tn este caso usamos la versión del métodoRun ( ) que acepta como parámetro 
solo un objeto de una clase derivada de ServiceBase F.xiste una segunda 
versión que acepta un arreglo de objetos de dicho tipo, iniciando varios servi¬ 
cios de una sola ve/ 

I o que hacemos en el método Main( ) es preparar el servicio, alojando su 
ensamblado en memoria v dejándolo preparado para que, desde la línea de co¬ 
mandos o mediante la utilidad Servicios va mencionada, pueda ser puesto en 
marcha, detenido, etc. 

Eventos opera clon a\ee 

Una ve/ que el servicio está alojado en memoria, su funcionamiento vendrá 
determinado por varios eventos de la clase ServiceBase l\n realidad esos 
eventos aparecen como métodos protegidos redefinibles en nuestra clase, si¬ 
guiendo el esquema que vimos en los capítulos previos al tratar el desarrollo 
de componentes. Si querernos, por ejemplo, responder al evento que se produ¬ 
ce cuando el usuario solicita pausar un servicio, no tenemos más que redefinir 
el método protegido OnPause( ). 

( orno mínimo, si no hemos modificado las propiedades que inicialmente 
tiene el servicio, deberemos redelinir los métodos OnStart( ) y OnStop( ) 
que, tal como se puede imaginar, se ejecutan en el momento de ponei en mar¬ 
cha v detener el servicio. También podemos rcdetinir los métodos OnPause( ). 
OnCont inne ( ), OnShutdown( ) v OnPowerEvent { ) en caso de que haya¬ 
mos dado el valor True a las propiedades correspondientes 

C uando se invoque a OnStart( ) es que el servicio debe ponerse en mar¬ 
cha Puede efectuar toda su acción en dicho método o poner en marcha un hilo 
de ejecución independiente, según las necesidades. TI servicio no puede po¬ 
nerse mas de una ve/, en marcha, pero si efectuamos un proceso mu\ largo en 
el evento OnStart( ) debemos habilitar algún mecanismo que permita dete¬ 
nerlo en caso de que se ejecute OnStop( ). 


Instalación del servicio 

Para que nuestro servicie», desarrollado según las directrices que acaban de 
darse, aparezca en la lista de servicios disponibles en el sistema es necesario 
instalarlo y, con este fin, deberemos incluir en el mismo ensamblado una < lase 
que tenga el atributo RunTnstaller v lacilite el proceso necesario para in¬ 
cluir en el registro de Windows las claves v valores apropiados. 

I ; n el ámbito System .Con f igurat ion . Install existe una clase, llama¬ 
da Insta 11er, que. derivada do Component, sirve como base de los distintos 
tipos de instaladores que podemos necesitar en una aplicación NI I Dos de 
las derivadas de dicha clase son Serv Lcelns ta 1 ler v ServiceProcess- 
Instalier. l a primera de ellas se encarga de la instalación de los servicios, 
mientras que la segunda se encarga de la configuración del ensamblado en el 
que se encuentran dichos servicios. 



l a utilidad de instalación installut.il. mencionada anteriormente. bus 
cara en el ensamblado que contiene nuestro servicio una clase que tenga el atri- 
butoRunlnstaller. Dicha clase, además, deberá estar derivada de Installer 
\, básicamente, tendrá que añadir a la colección Installers los objelos que 
se ocuparan del proceso de instalación. Installutil recuperara esos objetos 
de la mencionada colección e invocará a los métodos Install ( ) de cada uno 
de ellos, completando la tarea. 

Por cada servicio que exista en nuestro proyecto crearemos un objeto de la 
clase Serv i cel ns tal ler. asignando los valores apropiados a ServiceName 
v StartType. I a primera tendrá el nombre del servicio, mientras que la segun¬ 
da determinara el modo en que éste será iniciado. Los valores posibles de esta 
segunda propiedad son Automatic, Disabled y Manual, según deseemos 
que el servicie» so inicie automáticamente al poner en marcha el sistema, este 
inaccesible o tenga que ser iniciado manualmente. 


Nota 

Es importante que el valor que asignemos a la propiedad ServiceName 
del objeto Serviceinstaller coincida con el nombre que hemos dado 
previamente al servicio en la propiedad ServiceName de nuestra clase 
derivada de serviceBase, de lo contrario la instalación fallará. 


Ademas de un objeto Servicelns tal ler, nuestra! clase de instalación 
también debe crear un objeto de la clase ServiceProcessInstaller I sle 
m* encargará de la configuración no de los servicios sino del ensamblado en 
que están alojados determinando, por ejemplo, la cuenta que utili/arán para 
ejecutarse \, si es necesario, el nombre y la clave de usuario. 

Asistentes disponibles para desarrollar servicios 

tomo en muchos otros casos, podríamos desarrollar completamente un 
servicie.» Windows sin necesidad de usar entorne» alguno, tan solo escribiendo 
código. I a ventaja del entorno de desarrollo de Visual Basic .NI T, sin embar¬ 
go, es que dispone de asistentes \ diseñadores capaces de facilitar este trabajo 
generando parte do ese código, hueste casi» concreto los asistentes, o plantillas 
de i odigo, son dos. Para iniciar el desarrollo de un servicie» Windows seleccio¬ 
naremos (d elemento Servicio de Windows de la ventana Nuevo proyecto, como 
se aprei ia en la ligura 18.3. Aparecerá un diseñador en el que podremos inser¬ 
tar componentes que pudiéramos necesitar para nuestro serv icio, por ejemplo 
un MessageQueue o un Fi leSystemWatcher I slos elementos deprndeian 
de la propia íunüonalidad del servicio. 

<_ amblando al editor vera que va leñemos una dase derivada de Serv i ce- 
Base Lsta cuenta i on el melodo compartidoMain ( ) v los metodosOrrStart ( } 
y OnSt.op( ). I.n Main( ) encontramos el código siguiente: 





Shared Sub Main() 

Dim ServicesToRun() As System.ServiceProcess.ServiceBase 



ServicesToRun * New System.ServjceProcess.ServiceBase() 
{New Serviceüorario()) 

System.ServiceProcess.ServiceBase.Run(ServicesToRun) 

End Sub 
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Figura 18.3. Tenemos un elemento que genera el esqueleto del servicio 


l o que se hace es definir un arreglo de objetos ServiceBase que, en este 
caso concreto, tan solo cuenta con un elemento. Ese arreglo es facilitado como 
parámetro al método Run( ) de la clase ServiceBase, tal y como se indicaba 
en un párrafo anterior. A la vista del esqueleto generado por el asistente, lo 
único que tenemos que hacer nosotros es añadir el código de implementación a 
los métodos OnStart ( ) y OnStop( ). Como se indica en los propios comenta¬ 
rios introducidos por el asistente, en caso de definir mas servicios tendremos 
que modificar el método Main( ) añadiendo los elementos necesarios al arre¬ 
glo, antes de la llamada al método Run( ). 

Finalizada la implementación de los diversos servicios que vayamos a pro¬ 
gramar, el paso siguiente será añadir al proyecto una nueva Clase del instalador, 
usando para ello la ventana Agregar nuevo elemento (véase figura 18.4). Ob¬ 
tendremos un nuevo módulo de código con una clase derivada de Installer, 
tal v como si* apuntaba antes, en cuyo constructor crearemos los instaladores 
correspondientes al servicio. Con esto va tendríamos finalizado el desarrollo 
de la solución. 









Figura 18.4. Añadimos al proyecto la clase del instalador 

Nota 

Posiblemente en la versión definitiva de Visual Basic .NET el asistente Cla¬ 
se de instalador haga algo más que generar la clase derivada deinstaller, 
por ejemplo definiendo los objetos Servicelnstaller y ServicePro- 
cesslnstaller y estableciendo sus propiedades. En la beta 2 , que ha si¬ 
do la utilizada para redactar este libro, el asistente no efectúa ese trabajo 
y, por tanto, hay que codificarlo manualmente. 

Un servicio horario para red 

11astil ahora humos conocido teóricamente todos los elementos implicados 
un el funcionamiento v desarrollo do un servicio Windows, desdo la utilidad 
de control y el comando NET hasta las clases ServiceBase, Servicelnstaller 
v Serv iceProcess Installer. in este punto vamos a poner ese conocimien 
toen práctica v, para ello, desarrollaremos un servicio Windows que, mientras 
esta en funcionamiento, se mantendrá a la escucha en un cierto puerlo TC’P/IP. 
facilitando la techa local del sistema a cualquier equipo que pudiera solicitarlo 
a través de una red local o Internet 

Para desarrollar este provecto usaremos los servicios de comunicación K P 
IP do la plataforma .NFT, también conocidos como servicios de sot'kris o co¬ 
nectadores. Dichos servicios, representados como siempre por distintas clases, 
se alojan en el ámbito System. Net.Sockets. 

I I servicio pondrá un hilo de ejecución en marcha cuando se produzca el 
evento OnStart ( ). hilo en el que se quedara a la espera de las peticiones de 
los i líenles. Veamos cuales serian los pasos que tendríamos que dar 

















Definición de \a clase de servicio 


Usaremos el asistente anteriormente mencionado para generar el esqueleto 
del servicio, modificando a continuación la clase, l o primero será añadir al ini¬ 
cio del módulo las siguientes sentencias Imports, necesarias para poder acce¬ 
der cómodamente a los servicios de sockch f t bread $ y conversión de texto. 


Imports System.Net.Socket8 
Imports Sy stem. Th read i r»g 
Imports System.Text 

No es necesario alterar el constructor de la clase ni el método Main( ), va 
que ambos efectúan su trabajo apropiadamente. Si añadiremos a la clase dos 
miembros nuevos: 


Prívate MiSocket As New TcpListener{l0l0) 


Private MiThread As New Thread(AddressOf Escucha) 

La variable MiSocket es un objeto TcpListener que nos permitirá cscí/ 
char en nuestro sistema por un cierto puerto de comunicación, en este caso el 
1010. Asumimos que ese canal estará libre y podemos modificarlo libremente 
por cualquier otro en caso necesario MiThread es un objeto Thread, que ya 
conoce, asociado con el método Escucha ( ), os decir, ejecutará ose método al 
ponerse en marcha. 

A continuación modificaremos los métodos OnStart( ) y OnStop( ). cu¬ 
yos prototipos han sido introducidos va en el módulo por el asistente. I.a im- 
plemenlación, como puede verse a continuación, es realmente sencilla: 

» luV • 'I M.|» ■ • ir - . 

Protected Overrides Sub OnStart(ByVal args() As String) 

MiSocket.Start() 

MiThread.Start() 

End Sub 


Protected Overrides Sub OnSt.op( ) 

MiSocket.Stop() 

End Sub 

Traducimos la puesta en marcha del servicio en una llamada al método 
Start ( ) del TcpListener y del Thread. La primera abre el canal de comu¬ 
nicación para poder utilizarlo, mientras que la segunda inicia el hilo que se en¬ 
cargara de ejecutar el método Escucha ( ) La detención del servicio se limita a 
cerrar el canal de comunicación lo cual, tal y como vamos a ver a continuación, 



provocará una excepción en el método Escucha < ) que procederá a finalizar la 
ejecución del hilo. 

lan sólo nos queda codificar el método Escucha ( ) que es, precisamente, el 
más interesante ya que en é! se desarrolla el trabajo del servicio. F.l código es: 


Prívate Sub Escucha() 

Dim Codificación As New ASCIIEncoding( ) 

Do While True 
Try 

Dim SocketC1 lente As Socket * Mi Socket.AcceptSocket( ) 

• * i • ■ .» .* « . • 

SocketCliente.Send{Codificación.GetBytes( 

DateTime.Now.ToLongDateString.ToCharArray { >)) 
SocketCliente.Close() 

Catch 
Return 
End Try 
Loop 
End Sub 


Al llegar al método Escucha( ) va tenemos el TcpListener con el canal 
de comunicación abierto y a la escucha. Usamos su método AcceptSocket ( ) 
para recuperar la petición del cliente, quedando a la espera en caso de que no 
existiese ninguna. F.se método devolverá un objeto de la clase Socket que re¬ 
presenta el conducto por el que podemos comunicarnos con el cliente, conducto 
del que podemos recuperar y por el que podemos enviar información. Fl méto¬ 
do Send( ) es el que nos interesa en este caso, con el objetivo de env iar al clien¬ 
te la lecha actual sin esperar ningún dato mas por su parte. 

Fl método Send( ) necesita como parámetro un arreglo de tipo Byte con los 
bytes a enviar a través del s ocki't. Lo que nosotros tenemos es una cadena de ca¬ 
racteres obtenida mediante el método ToLongDateString ( ), conteniendo la 
lecha. Convertimos esa cadena de caracteres en un arreglo de caracteres sir\ ién- 
donos del método ToCharArray ( ) de la clase String. No es posible entregar 
un arreglo de tipo Char a un método que espera un arreglo de tipo Byte, va 
que en Visual Basic .NET un Char es un carácter UNICODE que ocupa 16 bits, 
mientras que un Byte son 8 bits. Dado que en nuestra lengua los caracteres al¬ 
fabéticos están todos comprendidos en el conjunto ASCII, nos servimos de un 
objeto System. Text. ASCIIEncoding para, mediante el método Ge tBy tes ( ), 
obtener el código numérico de cada uno de los caracteres, generando asi un 
arreglo de tipo Byte que es lo que necesitamos. 


Nota 

Revise la documentación del ámbito System.Text para obtener más in¬ 
formación acerca de ASCIIEncoding y su utilidad. 




I ras enviar la información al diente cerramos el canal de comunicación de 
manera inmediata. Observe que el proceso que acaba de describirse está en el 
interior de un bucle que se ejecuta sin fin, finalizando la respuesta a un cliente 
v quedando a la espera de Ja siguiente solicitud. Esta repetición sera constante 
mientras no se produzca una excepción al llamar a AcceptSocket ( ). caso en 
el que salimos del método Escucha ( ) y, por lo tanto, termina la ejecución del 
hilo que se había puesto en marcha. ¿Cuándo so generará dicha excepción? En 
el momento en que desde el método OnStop ( ) sea cerrado el canal de comuni¬ 
cación. 

Preparación del instalador 

Para completar nuestro proyecto tendremos que añadirle el instalador, usan¬ 
do para eso el asistente mencionado en un punto previo. Con esto ya tendremos 
nuestra clase, derivada de System.Configuration.Install.Installer, 
v tan solo tendremos que añadir la declaración de dos variables y unas senten¬ 
cias para configurarlas y añadirlas a la colección Installer l a declaración 
es la siguiente: 


y •!.»*••• •«« »< u *- *i i'-»--;* m o 5 

Dim ST As New ServiceInsta 1ler { ) 

Dim SPI As New ServiceProcessInstalLer() 

l a primera variable es el instalador para el servicio, un objeto que debemos 
personalizar indicando el nombre del servicio y el método de inicio. I.as dos 
sentencias, que añadiremos al constructor de la clase, son éstas: 

• **.»»>:*>.« «wt*-»• ríf si* .o 

SI.ServiceName = M ServicioHora" 

SI.StartType = ServiceStartMode.Manua1 

El valor asignado a ServiceName debe ser el mismo que contiene la pro¬ 
piedad ServiceName del servicio. Puede establecerlo abriendo la clase creada 
en el punto anterior en su diseñador y sirviéndose de la ventana Propiedades. 
El modo de inicio fijado es Manual, por lo que el servicio deberá ponerse en 
marcha manualmente. 

También tenemos que configurar el instalador del ensamblado, indicando 
la cuenta que debe utilizarse para ejecutarlo. Tenemos dos opciones: tacilitar 
un nombre de usuario y una clave, si es que nos interesa que se ejecute con los 
privilegios de dicho usuario, o bien utilizar las constantes de la enumeración 
ServiceAccount para usar cuentas específicas para servicios. Nosotros opta¬ 
remos por introducir la sentencia mostrada a continuación, usando la constan¬ 
te Loca lServ ice que equivale a indicar que debe ejecutarse el servicio en 
una cuenta con privilegios como para identificarse ante oíros sistemas. 


SPI.Account = ServiceAccount.Loca¡Service 



Fl úllimo paso sera añadir los dos objetos, SI y SPI, a la colección de insta¬ 
ladores devuelta por la propiedad Installers: 


Installers .Add(SI) 

Installers.Add(SPI) 

Instalación del servicio 

I Ionios finalizado el desarrollo de nuestro servicio que, al ser compilado, 
generara un modulo ejecutable con un ensamblado. Tendremos que abrir la 
consola del sistema o línea de comandos para proceder a su instalación. No le¬ 
ñemos más que llamar a la utilidad installutil facilitando como parámetro 
el nombre del módulo, incluida la extensión. Esto es lo que se ha hecho en la fi¬ 
gura 18.5 que, como se puede apreciar en la parte inferior, ha finalizado satisfac¬ 
toria mente. 


oa Visual Studio.NET Command Prompt 


>installutll Servil: laHnra.exe 
icrosoft <R> .NET Franevork I natallation utility 
Copyright <C> Mitrocofc Curp 2ü»Hl . All righln reuerved. 

Ejecutando nn« instalación do transacción. 

Iniciando la foso de instalación dentro de le instalación. 

nsulte el contenido del enchivo de registro sobre el progreso del ensamblado 
NDatnsTrabaJoNLibrnaNActua Jn*\l'HU isuallUn icNEl \Ejenploa\Cap_t BSSorv ic iollorar io 
inSServicioilora.oxo. 

Fl archivo estó ubicado en P:\DstosTMba josUhrsiMlctu«lRisP(niiUMllUxlcHErsi> 
lueSCop_lSsServicInHorrtriosbinSServicinHoro.instalILog. 

lanada Instalando, en el ensamblado F:\DatotIrabo iosLlbrossActualansPIlUieiia IDa 
icNETvtJanplet sCap^ttsBorviciollorarlosbinsfiarvie inflara.<■>«. 

Los paranetros afectador son: 

acsenhlyoath “ FzsDatonTrabajosLlbrooSActualonsPBUlsualllao icMEIsEJemplossCap 
tBsServic ionornrloNhifi\ScrvicioMora.exe 

logf i le “ P:\DatneIralM JoSLihronsAr.tua lscSPHt» isualHas lcHETsFJaraplossCap..l8S8i 
vic ioHorariosbinsBervicioHora. Installl.og 
Instalando el nervtclo Servic lnllnra ... 

1 servicio SaruieiolloM se lia instalado corree tañante. 

reanda origen de EvrntLog Bervielollora en ol registro Application... 

fase de imetalación fina llsó rorreetenerte y la fase dn confirman ido ittl e 
ir ando. 

lite el rontnnido del archivo dn registru sobro ol progrecu do I onsanhlailo 
; sOatoo I rebajo NklbroeMtCUle lns^PDU i sueltas icHE'lv£JetiplusVCap_18vServic Julio re rio 
ifnsServic tonara .exa. 

ti archivo vsti ubicado on P: vbatooTrabaJo\!.ibro»\nccii<*le3\PUUisuaIBa:i ícNFT\EJ 
iloasCap .i8v8ervic iollorar i o'-bjnVSnrv ic loHora. I natal ILou. 

.lanada Confirmando. en el msanblado l':--í>at<isTrab«Jo^Librnií^flctii»lo* v -PBUisua 18 
JcHET^E janploaNCap_18VSnrulriaNorarioVbin\KervicinHora.exe . 
g parémntros afectadon aun: 

«tssemblyiMth * F:ND«tPsTraka.Jo'vl,ihro*\ftctu«la*vpBUlsu«lJia* icNEl \EJenplos\Cap 
lllIsServ ir inflo rar in\binSf*erv ic inMo r*. oxe 

logf ile » F:\DatosTrnhaJo\liibrosN8ctiialecNPBUisualBaclcNETVEJnnplos\Cap.l8\S 
lie lollurar io\binvEervíc ioRora. lnstallLog 

los fase de confirmación fina tiró correctamente. 

instalación can trensacciones ha finalizado. 



Figura 18.5. Instalamos el servicio en el sistema 


Si lodo lm ido bien, el servil io deberá aparecer en la lista do servicios do I«i 
ligura 18.1. punto desde el que podremos ponerlo en marcha v detenerlo. I .un 







bien podemos utilizar el comando NET START ServicioHora y NET STOP 
ServicioHora para conseguir el mismo resultado desde la linea de comandos. 

Comprobación de I servicio 

l eñemos nuestro servicio instalado e, incluso, en funcionamiento si lo hemos 
puesto en marcha. No obstante, no sabremos realmente si efectúa su trabajo 
mientras no lo comprobemos Podríamos desarrollar una aplicación Windows, 
un componente o cualquier otro provecto que, utilizando los servicios desecAc/s 
tle la plataforma .NFT conectase con el sistema a través del canal 1010 y mus¬ 
itase la respuesta obtenida. Sin embargo es un trabajo que no necesitamos ya 
que basta usar el cliente Irlnvt que incluye Windows para ver esa respuesta. 

Abra la consola del sistema e introduzca en la linea de comandos la orden 
telnet localhost 1010, con la que indicamos que se inicie el programa 
telnet para conectar con nuestro propio sistema a través del puerto 10 10. De 
inmediato vera aparecer la lecha y un mensaje indicando que se fui perdido la 
conexión, lo cual es lógico va que nuestro servicio cerraba el canal en cuanto 
enviaba la información, sin esperar ningún retorno 

Como se aprecia en la figura 18.6, el servicio esta en funcionamiento y res¬ 
ponde adecuadamente a las solicitudes. Pruebe a detenerlo y a conectar, para 
ver que no obtiene respuesta. También puede modificar la implcmentacion del 
servicio para que en lugar de la techa devuelva cualquier otra información útil. 



Figura 18.6. Comprobarnos que el servicio está funcionando 

Controlando loe servicios 

Ahora que va sabemos cómo desarrollar un servicio para Windows, utíli 
/ando los asistentes y clases desi rilas en los puntos previos, vamos a dedicar 
el resto del capitulo a la creación de un controlador para esos servicios. Va ha 
visto que nuestro servu io puede controlarse mediante una consola del sistema 
v un aunando, de Tal lorma que podemos iniciarlo v detenerlo I sas mismas 






operaciones podemos efectuarlas desde una aplicación propia, una aplicación 
hecha a medida para controlar nuestro servicio. 

En realidad podemos controlar cualquier servicio, como veremos en un mo¬ 
mento, si bien lo habitual es desarrollar un controlador para un servicio espe¬ 
cifico, por ejemplo disponiendo un icono en el área de notificación para facilitar 
el inicio, detención y configuración del servicio. Este ultimo apartado, la confi¬ 
guración, es quiza la más importante, va que desde la consola de servicios de 
Windows tan solo pueden efectuarse tareas estándar, homogéneas para todos 
los servicios, 

La c\aee ServiceController 

Para poder conocer el estado y controlar las operaciones sobre un ser\ icio 
tendremos que crear un objeto de la clase ServiceController. Observe que 
en este caso no hav que derivar una nueva clase, como ocurre al crear al servi¬ 
cio, sino simplemente usar la clase Serv iceControl 1er para acceder al serví 
ció, de igual forma que utilizamos Thread para gestionar un hilo de ejecución, 
por poner un ejemplo. 

Esta clase dispone de múltiples constructores sobrecargados, siendo quiza 
el más interesante el que loma como único parámetro una cadena de caracteres 
con el nombre del servicio que deseamos controlar Este nombre es el mismo 
asignado a ServiceName en el momento de desarrollar el serv icio que, en nues¬ 
tro caso, seria ServicioHora. Si desconocemos el nombre del servicio, pode¬ 
mos utilizar los métodos compartidos GetServices ( ) vGetDevices( ) para 
recuperar sendos arreglos de objetos ServiceController representando a 
todos los servicios que no están relacionados con dispositivos, en el primer caso, 
o que si lo están, en el segundo. 

Disponiendo de un objeto ServiceController asociado a un servicio, nos 
serviremos de las propiedades CanStop, CanShutdown v CanPauseAnd- 
Continue para conocer las operaciones que es posible efectuar sobre él. Tam¬ 
bién podemos recuperar datos como la descripción del servicio: DisplayName, 
el nombre del ordenador en el que se ejecuta: MachineName, o su estado 
Status. Esta última propiedad puede tener uno de los valores enumerados en 
la tabla 18.1. Con ellos conoceremos si el servicio esta en funcionamiento, de¬ 
tenido, en espera de ser pausado, etc. 

Tabla 18.1. Valores posibles en la propiedad status 

Constante Indica que el servicio está 

Running En funcionamiento 

StartPending Iniciándose 

Stopped Detenido 

StopPending Deteniéndose 

En pausa 


Paused 




Constante 


Indica que el servicio está 

PausePending En espera de ser pausado 

Continuepending En espera de ser reanudado 


Nota 

Propiedades como status puede no tener un valor correcto si ha transcu¬ 
rrido cierto tiempo desde que se creó el objeto ServiceController, ya 
que el estado del servicio ha podido cambiar mientras tanto. Siempre pode¬ 
mos llamar al método Refresh( ) antes de acceder a esas propiedades 
para estar seguros de que el valor obtenido es real. 


Para .id liar sobre el servicio nos serviremos di* los métodos Start ( ), Stop( ), 
Pause ( ) y Continué! ) que. ionio puede suponer, inician el servicio, lo de 
llenen, lo pausan o reanudan, respectivamente. Estos son métodos genéricos 
que representan amones comunes a todos los servicios. 

Si estamos construyendo un controlador específico para un cierto sor\ icio, 
podemos enviar comandos «i medida mediante el método ExecuteCommand ( ) 
de ServiceController. 

Este toma como único, parametro un culero representando ese comando per¬ 
sonalizado El servicio, nuestra dase derivada de ServiceBase, invocara al 
método OnCustomCommand ( ) cuando se reciba un comando de este tipo, dán¬ 
donos opción a aduar en consecuencia. 

Un controlador genérico 

Básicamente ya conocemos toda la funcionalidad que puede o!recemos la 
clase ServiceController, por lo que vamos a ver, en la practica, como usar¬ 
la En principio diseñaremos un controlador genérico, similar a la utilidad de 
control de serv icios del sistema aunque mas sencillo Así aprenderemos a re¬ 
cuperar los servicios existentes en el sistema 

Comenzaremos diseñando una interfaz de usuario como la de la figura IS.7. 
I n el formulario se ha insertado un control ListView, que ocupa la mayor 
parle del espacio disponible, y un conjunto de botones en la parte inlerior. El 
control ListView es como una lista o control ListBox, con la diferencia de 
que es capa/ de mantener varios datos asociados por cada elemento I'.imbien 
puede mostrar iconos representativos de cada elemento, aunque ésta es una po¬ 
sibilidad que no vamos a usar. 

I emendo seleccionado el control ListView buscamos su propiedad Columns 
en la ventana Propiedades \ pulsamos sobre el botón que aparece junto al va¬ 
lor. abriendo la ventana de definición de columnas. Pulsaremos tres veces el 
boton Agregar definiendo las columnas que aparecen en la lignra 18.8, estable¬ 
ciendo su titulo v anchura. 
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Figura 18.7. Aspecto del formulario al finalizar la fase de diseño 



Figura 18.8. Definimos las tres columnas que aparecerán en la lista 


l os bolones estarán todos inicialmente desactivados, con la propiedad Ena- 
bled a False, a excepción del que hay masa Ja derecha, cuya lunción consiste 
en actualizar el estado de los servicios que aparece en la tercera columna del 
ListView. Tendremos que modificar la propiedad Anchor tanto de los boto¬ 
nes, para que permanezcan en su posición relativa a la parle interior del formu¬ 
lario, como del ListView, para que se ajuste en caso de que la ventana cambie 
de tamaño. 





Hinalizada la fase de diseño, leñemos que comenzar a introducir el código 
necesario asociado a los eventos del formulario, la lista \ los botones. Lo pri¬ 
mero que haremos será añadir la sentencia imports Syste. ServiceProcess 
al inicio del módulo de código, para poder usar la i lase ServiceControl 1er 
sin necesidad do oslar componiendo referencias completas. 

A continuación haremos doble clic sobre el formulario, o bien nos servire¬ 
mos de las listas desplegables que hay en el editor de código, para abrir el mé¬ 
todo asociado al evento Load. Dicho método lo aprovecharemos para recuperar 
una lisia de los servicios que hay en el sistema, añadiendo su nombre, descrip¬ 
ción \ eslatlo al control Listview. II código necesario sería el siguiente 


Private Sub Forro l_Load ( By Val sen de r As Sy st«?m. Ob jeot , 
ByVal e As System. EvenLArqs) Handles MyBase .Load 
Dim 'Servicie As ServiceController 


For Each CServicio In Serv i ceControl ler .GetServi eres 

With ListView1.ltems.Add(CSeivicíO.ServiceName) 

, Su bit ems .Add (CServicio.D. spla y Ñame ) 

.SubT teros. Add (CServicio.Status. ToSt ring ) 

End With 
Next 
End Sub 

Usamos el método compartido GetServices( ) ríe la clase ServiceCon- 
troller para recuperar un arreglo con todos los serv icios del sistema que no 
están asociados con controladores de dispositivos, arreglo que recorremos 
para obtener cada uno de los servicios. Usamos las propiedades ServiceName, 
DisplayName v Status para obtener el nombre del servicio, su descripción \ 
estado, respectivamente. 


Nota 

El control Listview dispone de una propiedad llamada ítems, como los 
ListBox, a la que podemos añadir los elementos. Dichos elementos, sin 
embargo, no son simples cadenas de texto. sinocomponentesListview- 
item. Cada uno de ellos tiene una serie de propiedades, entre ellas una 
llamada Subitems que da acceso a los datos que aparecerán en las co¬ 
lumnas de cada elemento. 


Si ejecutáramos el programa en este momento \ a veríamos aparecer la lista 
de servicios que hay en el sistema, pero no podríamos hacer nada más. I I paso 
siguiente sera controlar la selección de un servicio de la lista, recuperando su 
oslado y actualizando consecuentemente los botones que hav en la parte inte¬ 
rior LI evento de Listview que nos interesa es SelectedTndexChanqed y 
el código el mostrado a continuación: 





t. jli* v»?r gu** Hr» •■an»r*M- . /« ***/«•«••* imii c-»* *- ... *<* * . ••», 

Prívate Sub LisLViewl_Select_edTndexChanged( 

ByVal sender As System.Object, ByVal e As System . Even tArgs ) 
Handles ListViewl.SelectedindexChanged 


If ListViewl.Focusedltera Is Nothing Then 
Return 
End If 


Dim CServicio As New _ 

ServiceControiler(ListViewl.Focasedltem.Text) 

i * • 4 ' •« * * • t • * «? •« 

btnlniciar.Enabled * _ 

CServicio.Status <> ServiceContro1lerStatus.Runninq 
btnDetener.Enabled * CServicio.CanStop And _ 

CServicio.Status = ServiceContro)lerStatus.Running 
btnPausar.Enabled “ _ 

CServicio . C'anPauseAndCont inue And _ 

CServicio.Status = ServiceContro 1lerStatus.Running 
btnReanudar.Enabled * _ 

CServicio.Status » ServiceControllerStatus.Paused 

End Sub 

I I control ListView dispono do una propiedad, llamada FocusedT tem, 
que devuelve el objeto ListViewItem correspondiente al elemento que hay 
elegido en ese momento en la lista. Comprobamos que dicha referencia no sea 
Nothing, caso en el que no podríamos recuperar los datos necesarios y se pro¬ 
duciría una excepción. Si Focusedltem apunta a un elemento utilizamos su 
propiedad Text para recuperar el nombre del servicio, nombre que usamos 
como parámetro para el constructor de ServiceControiler con el fin de ob¬ 
tener un controlador para el servicio. Acto seguido modificamos el valor de la 
propiedad Enabled de cada botón según el estado de dicho servicio. 


Nota 

Para poder importar el ámbitoSystem. ServiceProcess desde este pro¬ 
yecto, que no es un servicio, debe añadir una referencia utilizando la op¬ 
ción adecuada del menú emergente asociado a la carpeta Referencias, en 
el Explorador de soluciones. Busque el ensamblado System.Service¬ 
Process. dll y añádalo. 


Kn lugar do preparar un método independiente para el evento Click de ca¬ 
da uno de los bolones, repitiendo parte del código ya que antes v después de 
iniciar o detener un servicio tendríamos que efectuar las mismas tareas, crea¬ 
remos uno común para gestionar los cuatro botones de operación, luí dicho 
método crearíamos un ServiceControiler asociado al servicio que se hava 
seleccionado en la lista, utilizándolo, en principio, para recuperar el estado ac¬ 
tual del servicio, antes de operar sobre el. A continuación, y dependiendo del 





botón que se haya pulsado, invocaremos al método que corresponda deServi- 
ceController. 

Antes de devolver el control nos serviremos de un bucle, como puede verse 
a continuación, para esperar hasta que el servicio haya cambiado de estado. 
Fsperaremos aproximadamente un segundo como máximo, invocando a cada 
ciclo del bucle al método Refresh( ) del controlador para conocer el nuevo 
estado del servicio. Si éste no cambiara significará que el servicio no responde, 
lo cual notificamos adecuadamente. 

f -.1 • - *»#,;.• .#• -Tí ,'rflS « ' . ri< f »•-, ti* .• . •»., 

Private Sub btnIniciar_Click(ByVal sender As System.Object, 

ByVal e As System.EventArgs) Handles btnIniciar.Click, 
btnDetener.C1ick, btnPausar.Click, btnReanudar.Click 

• > <■ ■ • . • *, ■< .«ir* 

Dina CServicio As New _ 

ServiceControl1er(ListViewl.Focusedltem.Text) 

. »y ,.i • i a> i 

Dim Estado As ServiceControilerStatus - CServicio.Status 

Dim Espera As Integer 

’íi »* i i*»»:.»i* *ih , .•* j-‘i 1 i.nt> 

Select Case CType(sender, Button).Name 
Case "btnlniciar" 

CServicio.Start( ) 

Case "btnDetener" 

CServicio. Stop( ) •. ti* ir .nú 

Case “btnPausar" 

CServicio.Pause( ) 

Case "btnReanudar" 

CServicio.Continué< ) 

End Select 


• **>• ‘ir ‘US» íí- o;i /‘.isifi •**'** ♦* 

i'¿Jimio íi*’i 3tfí\'iC¡>J - .lm¿i ¿te 

Do While Estado « CServicio.Status 
Espera += 1 

If Espera = 10 Then - g.i i • ->: 

mofif vuíOOB fu: .jv í jfo 

MessageBox.Show("No es posible actuar sobre este servicio") 

Exit Do 
End If 

4 <*spr* ramos una déc^mJi de segunda en cada “irlo 

System.Threading.Thread.CurrentThread.Sleep(100) 

* y 4^*1 i.a l J ¿amas <• i astado de i servicio 

CServicio.Refresh( ) 

Loop 


al f; 17 •«>:*** f *t-;l la lint rt mi nuevo ffSrjil" 

EstadoServicios() de Jos serva ;os 

End Sub 

Como puede ver en este código, lo último que hace el método de gestión de 
los botones es llamara un método llamado EstadoServicios ( ). Al pulsar el 
botón Actualizar también llamaremos a dicho método, que sera el encargado 



de recorrer la lista de servicios y ac tualizar el oslado leyéndolo de nuevo. El 
código de ese método es éste: 


Private Sub EstadoServicios() 

Dim Elemento As ListViewltem 

Dim CSer vicio As ServiceCont rol lez* 


For Eacb Elemento In ListViewl.Items 

CServicio = New ServiceController(Elemento.Text) 

Elemento.Subítems(2).Text =• CServicio.Status.ToString 

Next 


ListViewl_SelectedIndexChanged( Me, EventArgs.Empty) 

End Sub 

Con esto ya leñemos finalizado nuestro controlador de servidos Al ejecu¬ 
tarlo verá aparecer la lista de servicios del sistema. Seleccionando cualquiera 
de ellos los botones de operación se activarán o desactivarán según las accio¬ 
nes posibles. Por último, al pulsar cualquiera de dichos botones se enviara al 
servicio el comando correspondiente. 

En la figura 18.^ puede ver la aplicación en funcionamiento, justo después 
de haber pueslo en marcha el servicio MSSQLSERVER. 


Nota 

Tenga cuidado al utilizar esta aplicación, o la utilidad de gestión de servi¬ 
cios del sistema, y no manipule servicios que desconoce, ya que puede 
afectar al funcionamiento de su sistema. 


Un controlador para ServicioHora 

l o aplicación que acabamos de desarrollar es de uso genérico, en el sentido 
de que no opera sobre un servido concreto. Dado que el propio sistema opera¬ 
tivo ya cuenta con utilidades v comandos que permiten efectuar esas operacio¬ 
nes sobre cualquier servicio, no tiene mucho sentido que nosotros desarrollemos 
.ligo parecido aunque, como hemos visto en el punió anterior, podemos hacer¬ 
lo perfectamente. 

Utilizando exactamente los mismos recursos que hemos conocido, la clase 
ServiceConLroller y sus miembros, podríamos crear un controlador espe¬ 
cifico para nuestro servicio AI ser ejecutado, este controlador mostraría en el 
extremo derecho o interior de la Barra de tareas de Windows un icono de noti¬ 
ficación. Al desplazar el cursor del ratón sobre el indicaría, mediante un men- 





saje di* texto, el estado actual del servicio (véase figura 18.10), mientras que al 
hacer clic invertiríamos su estado, es decir, si esta detenido lo pondríamos en 
marcha y viceversa. Por ultimo, haciendo doble clic sobre el icono cerraríamos 
el controlador. 



Controlador de servicios Windows 
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Figura 18.9. Aspecto del controlador de servicios en tuncionamiento 
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Figura 18.10. El controlador específico muestra un icono en la Barra de tareas 















Para desarrollar este controlador partiremos de una nueva aplicación basa¬ 
da en formularios Windows. Lo primero que haremos será añadir al proyecto 
un Archivo de icono, como se muestra en la figura 18.11. El archivo se abrirá en 
un diseñador específico para iconos, el que aparece en la figura 18.12, donde 
daremos rienda suelta a nuestra creatividad. En nuestro caso nos hemos limi¬ 
tado a dibujar un círculo con unas agujas en su interior. Puede cerrar el editor 
de imágenes para volver al diseñador de formularios. 

Nota 

Existe una barra de botones específica para el diseño de imágenes que. ini¬ 
cialmente, no está visible. Use el menú emergente de cualquiera de las ba¬ 
rras visibles para acceder a ella. 



Figura 18.11. Añadimos un icono al proyecto actual 

A continuación tomaremos del Cuadro de herramientas un control Not if y- 
Icon y lo añadiremos a nuestro formulario. En la ventana Propiedades verá 
que este componente cuenta con una serie de propiedades que permiten esta¬ 
blecer si será o no visible, el texto asociado, icono y menú emergente. Use la 
propiedad Icón para recuperar el icono que acaba de diseñar, facilitando el 
camino completo al archivo. Aquí termina el trabajo de diseño propiamente di¬ 
cho, el resto del trabajo se efectuará mediante código. 

En principio no nos interesa que al ejecutar esta aplicación aparezca el for¬ 
mulario, dado que la interfaz de usuario será el icono de notificación, sin más. 
Utilizando la ventana de propiedades del proyecto, que ya conocemos, esta¬ 
bleceremos que el punto de entrada a la aplicación no será el formulario sino el 
método Main( ), un método que deberemos añadir a la clase Forml. También 
daremos el valor False a la propiedad ShowlnTaskBar del formulario, para 
evitar la aparición de un botón de acceso al programa en la Barra de tareas. 






Public Shared Sub Main() 



Dim MiFormularlo As New Forml() 


Application.Run( ) 

End Sub 
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Figura 18.12. Visual Basic .NET dispone de un diseñador de imágenes 



Figura 18.13. Modificamos las opciones del proyecto para iniciar 
la ejecución en Hain( ) 









Creo mus el formulario, poniendo así en marcho la configuración del compo¬ 
nente Not i £yIcón, v después ponemos en marcho la ejecución del programa 
pero sin mostrar el lormulario. Ln ese momento el ¡cono va estará visible en la 
Barra de tareas, puesto que dimos el valor True.i su propiedad visible. I o 
único ijiie tenemos que hacer ahora es responder a tres de los eventos del con- 
I rol Click, MouseMove v DoubLeC i ick. I I código de los métodos asm iados 
t i estos ex entos sería el siguiente 


Prívate Sub Not i fy.Teon 1_C 1 íck (ByVal sender As Object, 

ByVal e As Sys Lera . Even t Args ) Handles Not i f y I con 1 . C I i ck 

Dira MiServii-io As New Se r v i reConL ro l 1 er ( " Serv ir ioHora " ) 

if MlServ1cio.SCat.as * ServiceControllerStatus.Rumiing Then 
MiSptrv icio. Stop ( ) 

Else 

MiServí cío.Start{) 

End If 
End Sub 


Prívate Sub Not if y I conl_Mou seMoveí ByVa 1 sendei As Object, 
ByVal e As Sys>tem. Wiridows . Forms .MoiiseFven I.Args ) 
Handles Notitylconl .MouseMove 

Diro MiServtrio As New Ser v iceCont ro L ler ( "Servicioltoi a - ) 

Mol i f y Icón 1 . Text * l 11! < 

MiServicio.Status - ServiceControllerStatus.Runninq, 
•'Servicio horario en funcionamiento", 

“Servicio horario detenido") 

End Sub 


Prívate Sub NotifyIconl_DoubieCLick(ByVal sender As Object, 

ByVal e As Sy » t em. Even t Args ) Handles Nol i f y feon I . Doub I eC I i cck 
App1ication.Ex it( ) 

End Sub 

No es necesario hacer nada mas. Si ejecuta el proveí to comprobara que su 
funcionamiento se ajusta al objetivo que exponíamos al print ¡pió de este pun¬ 
to. leñemos un controlador especifico para nuestro servicio, de tal forma que 
podemos conocer v modificar su estado sin necesidad de acceder a la utilidad 
de gestión de servicios del sistema ni la consola o linea de comandos. 


Puntos clavo 


• Para crear un servicio es necesario definir una nueva clase derivándola 
de ServiceBase de manera análoga a como definimos un nuevo loi mu 
laño partiendo de la víase Form. 



• Un misino proyecto puede constar de varias derivadas de ServiceBase, 
apareciendo cada una de ellas como un serv icio distinto aunque alojados 
de manera compartida en un mismo módulo. 

• r n el mismo modulo en el que están los servicios es necesario incluir una 
clase que actué como instaladora. Dicha clase se derivará de System.Con- 
f igurat ion . Install. Installer v deberá tener el atributo Runlns- 
taller con el valor True. 

• I a clase que actúa como instaladora deberá crear un objeto Servicelns- 
taller por cada servicio que exista en el modulo, configurando propie¬ 
dades como el nombre o el modo de activación. 

• I ii esa misma clase también debe crearse un objeto ServiceProcessIns- 
taller para configurar el módulo que contiene a los servicios lanío los 
oh|etos Servicelns taller como el ob|eto ServiceProcessInstaller 
deben ser añadidos a una colección llamada Installers. 

• Mediante la utilidad installutil, desde la linea de comandos, pode¬ 
mos instalar y desinslalar los servicios que hayamos desarrollado. 

• La clase ServiceBase dispone de propiedades que determinan las ope¬ 
raciones que pueden efectuarse sobre el servicio, asi como métodos que 
debemos redefinir para responder adecuadamente a esas operaciones. 

• Mediante la clase ServiceControl ler es posible controlar cualquier 
servicio. I'ara ello dispone de métodos como Start ( ), Stop ( ), Pause ( ) 
v Continué ( ). que inician, detienen, pausan o reanudan el servicio aso¬ 
ciado al objeto. 


Resumen 


I ras leer este capitulo hemos aprendido prácticamente lodo lo relativo al 
diseño de servicios Windows con Visual Basic .Nhl, habiendo visto también 
cómo los asistentes con que cuenta generan gran parte del código necesario. 
I temos desarrollado un servicio simple v comprobado su funcionamiento, un 
servicio que puede útil i/ar como base para crear otros a su medida. I inalmcn- 
te, si* ha descrito l.i clase Serv ¡ceController v mostrado como usarla para 
c rear controladores tanto genéricos como específicos 

Al tiempo que hemos cubierto la materia propia de este capítulo, en sus 
ejemplos también hemos aprendido a usar, aunque básicamente, los servicios 
de >ecAc/s de la plataforma NI I asi como componentes que no conocíamos. 
LisLView v Notifylcon. Será así en la mayoría de los casos, en la practica al 
necesitar una cierta funcionalidad, como va va conociendo el resto de los contro¬ 
les v componentes de que dispone Visual Basic NI I. 
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DeearroWo 
de eervlcloe \Neb 

I oii dientes actuales que existen en I.) Web. \ a sean usuarios tísicos o apli¬ 
caciones de terceros, son consumidores de servicios. Conseguir que la actual 
red, compuesta principalmente de paginas I t I MI \ archivos, se convierta en 
una red de servicios es uno de los objetiv os de la plataforma .NI I Un serv icio 
Web es, como su propio nombre indica, un servicio que una determinada em¬ 
presa pone a disposición de los usuarios. Dependiendo de las necesidades, pue¬ 
de tratarse de un servicio de liso interno o accesible para el publico de Internet 
en general. Para crear un servicio Web podemos usar i u a Iquiera de los lengua¬ 
jes disponibles en la plataforma NI I , mientras que los consumidores pueden 
potencialmente estar en cualquier lugar v ejecutándose sobre cualquier hard¬ 
ware v sistema operativo. Realmente, cualquiera puede ofrecer o consumir un 
servicio Web si iilili/.a el protocolo adecuado, no os necesario disponer de Win 
dmvs. la plataforma NHl oel lenguaje* Visual Basic .NL I 

Aunque existen implemeiitaciones que permiten publicar servicios Web so 
bre otros sistemas, gracias a IBM es posible, por ejemplo, usar Apache, en este 
capitulo nos centraremos en el uso de 11^ sobre Windows. I os consumidores 
pueden usar una simple solicitud I I I I P. desde un i Mente Web, o bien usar un 
protocolo KIV sobre XMI conocido como SOAP (S ¡tupir Aivess Pmtocol). 

¿Qué ee un eervicio Web? 



Actualmente raro es el usuario habitual de mtormatiea que no sabe lo que 
es una página Web. Si le hablamos de un servicio Web, sin embargo, seguro 





que la mayoría de ellos no lo tendrán muy claro, lis lógico al tratarse, como va 
se ha dicho, de un concepto relativamente nuevo. ¿Qué es en realidad un ser\ i- 
cio web? ¿C ual es su aspecto? ¿Como podemos crear uno o utilizarlo? Estas son 
muchas de las cuestiones que surgen en un principio 

Imagine que usted adquiere un ordenador nuevo \ que en el tan sólo encuen¬ 
tra inicialmenle un sistema operativo, nada mas Para efectuar su trabajo, sin 
embargo, seguramente necesitará una libreta de direcciones, una calculadora v 
una aplicación de calculo de estructuras, por poner algunos ejemplos. Obvia¬ 
mente, pensara, lo que tiene que hacer es buscar y adquirir el software que ne¬ 
cesita, instalándolo en su ordenador para usarlo cuantas veces necesite. 

Este es el modo en que finn iomiiito* actualmente con nuestros ordenadores. 
Periódicamente, además, solemos actualizar lodo ese software que hemos adqui¬ 
rido para disponer de una serie de posibilidades que, en ocasiones, ni siquiera 
necesitamos. 

Servicios y aplicaciones 

En cierta forma, una aplicación es un servicio o un conjunto de servicios 
instalados en nuestro sistema. Microsoft Excel, por hablar de un programa 
bien conocido, es una aplicación formada por varios componentes o servicios 
distintos que facilitan la edición de los libros, diseño de gráficos, etc 

Suponga que los distintos componentes que forman Microsoft Excel no es¬ 
tán instalados en su ordenador sino en un servidor Web. por ejemplo en la sede 
de Microsotl, v que para usarlos lo que hace es enviar solicitudes mediante su 
navegador habitual. Los componentes serian servicios Web, la sede de Microsoft 
seria la que expondría dichos servicios v, finalmente, nosotros 'Actuaríamos co¬ 
mo consumidores 

La aparición de los servicios Web va a influir en la torma de hacer negocio 
de muchas empresas Con la expansión de Lis redes empresariales v su interco¬ 
nexión a través de Internet, serán muchos los que opten por alquilar u ofrecer 
sus productos en forma de servicios Web, en ve/ de hacerlo como hasta ahora, 
vendiendo licencias de uso de esos productos. A las empresas consumidoras, 
asimismo, puede interesarles mas pagar por el uso de esos servicios que adqui 
rir las aplicaciones equivalentes, sabiendo que siempre van a estar usando las 
últimas versiones sin necesidad de actualizar sus programas 

Para que este mecanismo de oferta de servicios tenga éxito, no obstante, an¬ 
tes es necesario que las distintas empresas implicadas lleguen a acuerdos de 
estándares para la descripción de servicios, la comunicación con ellos, la bus- 
queda, etc. 


Universalidad de un servicio 


Actualmente, al publicar un documento en un servidor Web no nos preocu¬ 
pamos demasiado sobre la plataforma hardware, el sistema operativo ni las 
aplicaciones que utilizara el cliente para acceder a él. Esto es posible porque 



I 11 MI, es un ostandar universal, lo mismo que el protocolo III II’ utilizado pa¬ 
ra solicitar y transmitir esos doi límenlos. De esta forma se consigue que un 
cierto servicio, en este caso la Web, sea realmente universal, va que esta accesi¬ 
ble para todos sin limitaciones. 

Conseguir que los serv icios Web alcancen ese mismo nivel tic universalidad 
es uno de los objetivos de empresas como Microsoft e IBM que. continuamente 
con muchas otras, están definiendo protocolos v borradores de estándares que 
permitan describir un servicio, publicarlo para que los consumidores puedan 
encontrarlo, establecer una comunicación con el por parte de los clientes, etc 

Aunque sea algo reiterativo, hav que incidir en el hecho de que es posible 
crear un servicio Web utilizando cualquier lenguaje, sobre cualquier sistema 
operativo v arquitectura o plataforma hardware. Tara conseguir que ese servi¬ 
cio sea accesible para los consumidores hav que describirlo usando un lengua¬ 
je estándar que es WSDI. (lVVi? Service Descnfifio/r I on^im^e) I I cliente podra 
estar creado también en cualquier lenguaje v ejecutarse sobre cualquier siste¬ 
ma operativo y hardware, obteniendo la descripción WSDL de un servicio de 
directorio conocido como IJDDI (iliuvn^al De<i riplion, Di<eoveru and Inte^rolion) 

C on esta inlormacíon si* comunicaría con el servicio usando protocolos como 
HTTP o SO Al» 

Protocolos y lenguajes 

1 os servicios Web tienen como objetivo hacer mas realidad que nunca la 
meta perseguida por la computación distribuida, para la cual se han utilizado 
hasta ahora tecnologías como CORBA, DCOM o lava RMI. El problema es po¬ 
der efectuar llamadas a procedimientos remotos con un protocolo RPC (Reinóle 
Procedmc Culi) que no dependa de un cierto sistema, como es el caso de DCOM. 
o lenguaje, como ocurre con RMI. 

I lace un par de años (res empresas, Deveiopmentor, Userl and y Microsoft, 
propusieron un protocolo que permitía efectuar llamadas RPC usando el len¬ 
guaje \ML para describir la llamada y parámetros y el protocolo III I P como 
transporte, Kl uso de I IT! P para el transporte de las llamadas salva muchos 
obstáculos con los que se encontraban CORBA v DC OM, va que la mayoría de 
las empresas utilizan cortafuegos que impiden la entrada en sus serv idores por 
puertos no estándar. 

El puerto usado para II I I P, la base de la Web, es uno de los considerados 
estándar v, por tanto, ideal para ser utilizado por SOAP 

Dado que SOAP describe sus llamadas \ respuestas utilizando XM1 . en la 
practica es posible utilizarlo desdo cualquier sistema operativo v lenguaje. Ai 
tualmente existen diversas implemenlaciones que permiten utilizar SOAP des 
de Windows, Unix v I inux. 

Utilizando SOAP cualquier cliente puede consumir un servicio ofrecido por 
un proveedor, aunó puede verse en la figura 1^ I. Es necesario, no obstante, 
que el cliente conozca de antemano la localización v naturaleza del servicio, 
sabiendo a que métodos puede llamar, con que parámetros v que tipo de res¬ 
puesta obtendrá. 




Figura 19.1. Un consumidor usa SOAP para, a través de Internet, 
acceder a un servicio ofrecido por un proveedor 

La descripción de un servicio se efectúa, como se dijo antes, en WSDI (WW> 
Service Description l.angua# e). Un módulo VVSDL es un archivo XML en el que 
se identifica el servicio y se facilita el esquema para poder utilizarlo, generalmen¬ 
te entregándose información sobre los distintos protocolos que es posible utili¬ 
zar. Mas adelante veremos cómo obtener el VVSDL correspondiente a un servicio 
Web creado por nosotros, ya que ASP.NET es capaz de generar esa descripción 
automáticamente. 

Resueltos los problemas de conectividad entre consumidor y proveedor y 
descripción de los servicios, nos encontramos con un último Obstáculo: cómo 
encontrara el consumidor a los proveedores que ofrecen los servicios que el 
necesita. Traslade la situación a otro entorno. Piense que necesita los servicios 
de un fontanero, ¿dónde buscaría lo que necesita? Efectivamente, en algún tipo 
de guia o paginas amarillas. 

Tras llegar al acuerdo de creación del lenguaje WSDI., las tres empresas cita¬ 
das antes anunciaron a principios de septiembre de 2000 que estaban trabajan¬ 
do en un servicio llamado UDDI. Se trata de un servicio de directorio a nivel 
mundial en el que los proveedores de servicios, de manera gratuita, podrán re¬ 
gistrar sus productos. I os consumidores usaran UDDI para consultar ese regis¬ 
tro a la búsqueda de lo que necesitan. En él encontrarán una descripción de los 
servicios, información sobre (‘I proveedor y todo lo necesario para contactar 
con él. 

Mientras que algunos protocolos y lenguajes están ya finalizados y propues¬ 
tos como estándar, es el caso de SOAP, otros por el contrario están en plena 
fase de desarrollo y evolución, corno VVSDL y UDDI. La parte más importante 
de este capitulo está centrada en la creación y consumo de servicios usando 
Visual Basic .NET. 

En los puntos siguientes encontrará una introducción a los protocolos v len¬ 
guajes más importantes relacionados con los servicios Web. Si desea más infor¬ 
mación sobre ellos visite las sedes de Microsoft. IBM y el W3C 





Introducción a XML 


t'oniu «niles oi tirni'N ron otras tei nologias surgidas de Internet. los desa¬ 
rrolladores están encontrando en \MI múltiples aplicaciones. Si aun creo que 
\MI es uim variante de 11 IMI o que tan solo sirve para componer dmlímen¬ 
los para la Web, le interesa seguir leyendo. 

No os que XMl (cX/n/s/Wr \hnbt}> I enguaje de marcas ostensi¬ 

ble) sea algo realmente nuevo, pero aun asi sigue existiendo una cierta contu¬ 
sión en torno .1 el Sun mu dios los que piensan i|ue XMl es un.i vanante o un 
derivado de III MI v otros tantos creen ipie tan sólo es útil para inseriar la 
Mas de dalos en las páginas II I MI No obstante, XMl puede man «ir, v ríe he 
dio esta haciéndolo, el íuturo en campos tan importantes como las bases de 
datos o el comen 10 electrónico, prueba de ello es la apuesta en este estándar 
por parte de centenares de empresas de todos los sectores 

t orno programador, posiblemente tenga que vérselas con XMl en un pla/o 
relativamente corto, si es que no ha tenido que hacerlo va. Medíanle XMl el 
intercambio de inlormadón. rnlie distintas aplicaciones, sistemas \ platafor¬ 
mas. es nuilho más tacil. I I diseño de sen icios Internet pañi «10 eso .1 bases de 
dalos empresariales, una necesid.id 1 ada ve/ más presente, también es una l«i- 
um más sencilla usaiulo XMl., 1 on juntamente con hojas de estilo XSl (r\h , tf % *¡b¡r 
^h/lohccl I 

lanío XMl como XSl son estándares del VY3(', el con.soicio que rige mu¬ 
chos de los estándares que se usan en Internet \ son aceptados inlernacionalmen- 
le Si desea mantenerse al di.i respecto «i XMl . v otros estándares relacionados, 
anote en mi lista de páginas web la direi 1 ion hLLp: //www. w3 . org 

I 11 los puntos siguientes eruont rará l.i información m*i esa ría para saber que 
es XMl . qué es un puse; XMl , cómo creai doiumentos XMl bien formados \ 

» orno 1 omprobar su valide/ I atnbién conoceremos lo que son los doi límenlos 
de definición v las hojas de estilo, con las que podremos generar I I I MI .1 par¬ 
tir de documentos XMl 


¿Qué. ee XML? 

C. orno su propio nombre indica, XMl es un lenguaje de etiquetas extensible. 
es decir, en el que podemos 1 re.ir nuestras propias in.m as o etiquetas. I .as eti¬ 
quetas son la base de XMl . al igual que ocurre con 111 MI No es de extrañar, 
va que ambos son lenguajes derivados de S( ¡MI í.Vrnv a//:.c</ Mtirkiij* 

I /mym/yc). I I uso de etiquetas, no obstante, es uno de los pocos puntos comu¬ 
nes que ha\ entre XMl \ II I MI 

I .1 finalidad de un documento XMl. es definir la estructura de una informa- 
vión. contenida asimismo en el propio documento. I as etiquetas XMl no indi¬ 
can, por el contrario, cual es el formato visual de l.i inlormacion. 

II I MI es un lenguaje de manas, pero su Inulidad es tan solo establecer la 
apariencia de unos d a tos contenidos en el documento, en ningún caso drsu ¡bir 
su estructura. 



Extensible Markup Language (XML) - Microsoft Internet Explorer 
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Extensible Markup Language (XML) 
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Figura 19.2. Sede web del World Wide Web Consortium dedicada a XML 


Usando XMI el usuario puede definir sus propios etiquetas según la nitor 
ni<K ion euvo estrile tura necesite describir. I slo significa que no existe un limi 
te preestablecido, en la propia definición del lenguaje, que actué como frontera 
en cuanto a los Jatos que es posible describir I U MI . por el contrario, cuenta 
i on un conjunto bien coiuk ido de etiquetas, con una finalidad preestablecida \ 
no ampliable por el usuario final. 


Trabajo <;on étiaurtao 

lauto un documento XMI como uno III \ 11 contienen dalos y etiquetas. 

I as etiquetas 111 MI afectan a la apariencia de los dalos, presumiblemente de 
una forma independiente del dispositivo final en que se muestren I as etique 
tus XMI no indican como debe mostrarse luí dato, sino que es el dato. 

Observe el listado siguiente, correspondiente .1 un documento I II MI . v el 
que l\u\ inmediatamente detras, que tiene la misma información pero en XMI . 


"C tntvrw* 






A iu> ser que so tengan conocimientos do H I ML V sera difícil saber cuál os ol sig¬ 
nificado do etiquetas como <p> o <li>. Hn ol documento XMl por ol contra¬ 
rio, las etiquetas son autodescriptivas v. en consecuencia, es tácil apreciar que 
la información es una lista do producios clasificados en varios grupos. 

<htmi > 

<body > 

LISTA DE PRODUCTOS 

* p -Software 

<ul> 

<li> 

Visual Basic .NET</li> 

Visual C -l * . NET</li> 

<li> 

VisualAqe Cf .NET</ii> 

< li> 

Visual Jl .NET</1i> 

</ul> 

< p>Libros 

<ul> 

<li> 

Programación en Windows ¿000</li-- 
<li> 

Cómo programar con Visual Basic para torpes</li* 

< ii> 

Programación con Visual Basic . NET<-/li^> 

<li> 

Programación con Visual Studio .NET</li> 
óul> 

• body - 
</htral> 

Como puedo vera continuación, el documento XMl os autodoscriptivo: 

<?xml versión - "l.0" 7 > 

<ListaProductos> 

<Software^ 

< P roduc t o>V is ua 1 Basic .NET< /Producto> 

' Producto'Visual C+ + .NET</Producto> 

< Producto »Visua lAge Cf . NET< / Producto 
<Producto>Viaual Jf .NET</Producto» 

</Software> 

<Libros> 

<Libro>Programacií. f 2 4 3 ; n en Windows ¿000</Libro * 

<Libro>Ci« # 24 3 ; mo programar con Visual Basic para torpes</Libro> 

< Libro 'Programac i& I 2 4 i ; n con Visual Basic .NET</Libro> 

«'Libro >Programaci& f24.1; n con Visual Studio .NET</Libro> 

</Libros> 

</ListaProductos> 

VleuaWzaclón de loe documentos 

Para croar un documento tan simple como el propuesto y ver su estructura, 
no es necesario utilizar ninguna herramienta especifica. Kl Bloc de notas de 



Windows es una utilidad suficiente para este trabajo. No obstante, siempre 
puede utilizar el propio editor de Visual Basic .Nb I va que, como se aprecia en 
la figura 19.3, reconoce la sintaxis de 1ÍTML v XM1 . destacando sintácticamente 
los diferentes elementos. 

Cuando se trabaja con documentos II I MI y XML, el editor de Visual Basic 
.IMF.T muestra normalmente unas pestañas, en Ja parte interior, que nos permi¬ 
te alternar entre el código propiamente dicho y una previsttalización del docu 
mentó resultante, en el caso de I ITML, o bien la tabla de datos que contiene el 
documento XMI De hecho, puede usar la vista previa de 1LJ MI para crear el 
documento visualmente, sin necesidad de introducir marcas y, Je igual forma, 
la pestaña Data del editor XMI hace posible la introducción de nuevos datos 
en el documento de manera mucho mas simple. 



<*HTMLXML - Microsoft Visual Basic.NET [diseñar} - LfstaProductos.xml* 
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Figura 19.3. Edición de documentos HTML y XML en el editor 
de Visual Basic NET 












En la figura 19.4 puede ver el documento 111 MI , correspondiente al primer 
listado, abierto en la página Diseño del editor de Visual Basic .NEI El aspecto 
es el de una lista de productos agrupados en categorías, tal y como se espera¬ 
ba. El aspecto que tendría este documento en otro cliente, por ejemplo Netscape 
Navigator, sería prácticamente idéntico, ya que las etiquetas KTMI. especifi¬ 
can cual debe ser la apariencia de la información. 

En la parle inferior de la misma figura aparece el documento XMI en la pa¬ 
gina Data del editor XML de Visual Basic .NET. El resultado, como puede ver¬ 
se, es bien distinto. La plataforma .NET incorpora un analizador XML y otras 
herramientas que Visual Basic .NET utiliza para comprobar la estructura del 
documento y, en caso de que esté bien formado, recuperar su contenido y faci¬ 
litar la edición. La lista de datos, además, es dinámica. Puede abrir y cerrar las 
distintas ramas que existen. 


** HTMLXML - Microsoft Visual Basic.NET [diseñar] - 

LlstaProductos. xml* 
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Figura 19.4. Edición visual de los documentos HTML y XML 






Gracias a la capacidad de los editores de Visual Basic, no será necesario re¬ 
currir a herramientas externas para trabajar con documentos HTML o XML. 


Nota 

Al introducir código XML en el editor de Visual Basic .NET, tras crear el do¬ 
cumento con el correspondiente elemento de la ventana Agregar nuevo 
elemento, verá que al abrir una marca, por ejemplo<Producto>, automá¬ 
ticamente aparece el cierre y el cursor queda entre ambas etiquetas, espe¬ 
rando la introducción de información. 


Estructura de un documento XML 

La estructura de un documento XML, como ha podido ver en el ejemplo an¬ 
terior, es bastante sencilla, si bien puede complicarse algo con el uso de entida¬ 
des y propiedades. Todas las marcas o etiquetas se delimitan, como en el caso 
de HTML, con los caracteres < y >. 

Si los dos caracteres mencionados se acompañan de signos de cierre de inte¬ 
rrogación, como en el caso de la etiqueta < ?xml version=" 1.0” ?>, la marca 
adquiere un significado especial. A este tipo de marcas se las denomina de 
proceso, sirviendo para indicar, por ejemplo, la versión de XML a la que se ajus¬ 
ta el documento, el conjunto de caracteres utilizado, etc. La versión actual, y 
única existente, de XML es la LO, de ahí que por el momento sea esa la única 
versión que pueda utilizarse. 

Tras la etiqueta que identifica al documento comí) un documento XML., que 
es la primera, el resto de la información se compondrá de etiquetas y datos. Las 
etiquetas pueden ser creadas por nosotros, como en el caso del ejemplo ante¬ 
rior, o bien tomarse de una DTD (Documcnt Type Defin ilion, Definición de tipo 
de documento) o un esquema XSD ya existente. La existencia de DTDs v es¬ 
quemas públicos y estándar facilitan el intercambio de información entre dis¬ 
tintas empresas y aplicaciones, al ajustar todas ellas sus documentos XML a 
una cierta estructura definida. Los documentos HTML, por mencionar el caso 
más conocido, se ajustan a una cierta DTD en la que se indican las etiquetas 
que pueden existir v su estructura. 

Estructura áe ios datos 

Los datos de un documento XML se estructuran siempre de forma jerárqui¬ 
ca. Esto significa que existe un elemento raíz, en el caso de nuestro documento 
es <Lis taProductos>, que contiene a los demás: <Sof tware> y <Libros>. 
Éstos, a su vez, pueden contener otros elementos. Entre las etiquetas de aper¬ 
tura v cierre se introducirá la información que, en el ejemplo propuesto, es el 
nombre de los productos. 

A pesar de que en el ejemplo anterior tan sólo existen dos niveles de datos, 
lo cierto es que pueden crearse tantos como se necesiten. Observe el dw umen¬ 
tó XML siguiente, que es una ampliación del anterior. En el se detallan ahora 




ciertos datos de cada producto, como el nombre, descripción, fabricante, autor 
o editorial, según los casos. Fíjese en el sangrado del texto que. a pesar de no 
ser aleo obligatorio, aclara bastante la estructura durante la edición. Gracias a 
este sangrado es fácil ver que la etiqueta <Distribuidores> cuenta con una 
lista de datos, por poner un ejemplo. No obstante, la manera mas clara de ver 
la estructura del documento consiste en abrirlo en Internet hxplorer, como se 
lia hecho en la tiguru 1^.5. Para ello no tiene mas que usar la opción Ver>Abrir 
con ... y seleccionar el elemento correspondiente a Internet Fxplorer. 

<?xml versión-“1.0" encoding*"ut£-8" ?> 

ListaProductos 
< Software- 
■ Producto - 

<Nombre>VÍ8ual Basic . NET< /Nombre» 

■ Descripcion>Ent.orno de desarrollo RAD basado 
en BASIC</Descripción> 

Fabricante>Microsoft- /Fabricante - 
< Distribuidores» 

<Distribuidor>Danysoft</Distribuidor > 

<DistribuidoraDatabase DM</Distribuidor» 

</Distribuidores • 

</Productos 

< Producto 

<Nombre>V18ua 1 C+ + .NET</Nombre> 

Descripción *C!omp i 1 ado i de CM para la plataforma 
. NIST< / Descripción > 

Fabricante >Microsof t</Fabricante » 

<Distribuidores> 

Distribuidor>DanySof t< Distribuidor * 

<Distribuidor>Actiou</Distribuidor> 

/Distribuidores 
</Producto* 

• Producto^ isual CI . NET< / Producto * 

< Producto>V i sua 1 Ji . NET< / Producto 
*/Software> 

<Libros ■ 

-'Libro» 

<Titulo>Proqramacion en Windows 2000</Titulo> 

Autor>Franciseo Cliarte* /Autor • 

Editorial>Anaya MuíLimedia</Editorial> 

</Líbro> 

- Libro > 

<Titulo>Como programar con Visual Basic para torpes-/Titulo* 

<Autor>Francisco Chaite*/Autor» 

- Editor ial >Ariaya Mu 11 imedi a*'/Editor ial 
</Libros 

< Libro-Programac i ón con Visual Basic .NET</Libro> 

<Libro>Pioqramaei o» con Visual Studio .NET</Libro> 

</Libros > 

</ListaProductos> 


conjuntos de ra\ dclei ro nn XVII 

los .documentos \MI pueden encontrarse coditii <ulos <n distintos conjun¬ 
tos de caracteres, siendo el asumido por delecto UTF-8, que es un Unicode de 



8 bits. En caso de utilizarse cualquier otra codificación, será preciso indicarlo 
en la etiqueta de proceso que hay al inicio del documento. 
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Figura 19.5. Aspecto del documento XML abierto en Internet Explorer 

Si observa los documentos XMI correspondientes a los ejemplos anteriores, 
podrá ver que en el primero no existen caracteres acentuados Estos han sido 
sustituidos por cntiiitulc s como & # 2 4 3 ; que representan al carácter que desea 
incluirse. Alternativamente, podría haberse utilizado &oacute; 

l.o anterior es necesario porque en la codificación por defecto no tienen ca¬ 
bida algunos caracteres europeos, como las vocales con .ícenlos graves o agu¬ 
dos o la Ñ Si deseásemos incluir estos caracteres directamente, tendríamos 
que especificar de manera explícita una codificación que los permitiese 

Aunque utilizar una codificación diferente es algo perleclamente valido, en 
ocasiones nos podemos encontrar con problemas si un cierto analizador no re¬ 
conoce ese conjunto di- caracteres. La solución pasa por usar siempre UTF-8, 
sustituyendo los mencionados caracteres por sus códigos. 








Documentos XML bien formados 


A diferencia de lo que ocurre con los documentos HTML, en los que existe 
una cierta permisividad en cuanto a su estructura, los documentos XML deben 
estar birn fomuiilos para que su proceso sea posible. Para conseguir que un do¬ 
cumento XML este bien formado tan solo hay que seguir unas reglas básicas, 
reglas que, ademas, podrían aplicarse también a HTML. 

Un documento XMI debe iniciarse siempre con la etiqueta de proceso que 
le identifica como XMI v en la que, además, se indica la versión, el conjunto de 
caracteres utilizado, etc. A continuación tiene que existir una etiqueta que ac¬ 
tué como raíz, en la que estarán contenidas todas las demás. Fn cada documen 
to XMI tan solo puede existir una raíz, en caso contrario no estará bien lomudo. 

Podas las etiquetas XMI deben tener su pareja, es decir, toda apertura debe 
contar con un cierre. I lay que tener en cuenta, ademas, que no pueden existir 
solapamientos entre las aperturas v cierres, sino que cada pareja de marcas de¬ 
be contener totalmente a los datos que define. Por ello, los dos fragmentos de 
código XML no estarían bien formados. 

< ? xml version="1.0”?> 

<ListaProductos^ 

<Software> 

<Producto>Visual Basic .NET 

</Software> 

* ListaProductos> 


<?xml versión*"1.0 M ?> 

<ListaProductos^ 

<Software> 

<Producto>Visual Basic .NET 

</Software></ Producto 

</ListaProductos> 

P'n el primer caso la etiqueta <Producto> no cuenta con la correspondiente 
</Producto>, mientras que en el segundo el orden de las etiquetas no es el 
correcto, ya que <Software> debería contener totalmente al grupo de datos 
<Producto>. Al intentar procesar este código, simplemente cambiando a la 
página Data del editor, el analizador XMI generará un error Fn la figura 19.6 
puede ver cómo se indica que el documento no está bien formado, comunicán¬ 
dose el punto donde está el error y su naturaleza. Algo parecido ocurrirá si in¬ 
tenta abrir el documento en Internet F.xplorer. 

Existen otras normas adicionales para que un documento esté bien lomu¬ 
do, como por ejemplo la obligatoriedad de que los valores de las propiedades 
estén entrecomillados. Conocerá estas normas a medida que vaya introducién¬ 
dose en el uso de XML. 

Como puede observar en el ejemplo de H I ML mostrado anteriormente, pa¬ 
ra que éste sea válido no es preciso cumplir todas las normas. La marca <p>, 
por ejemplo, no cuenta con sus correspondientes cierres: </p>, y no por ello el 
cliente web emite error alguno. 
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Figura 19.6. El analizador nos indica dónde ha encontrado el error 


Docuwrrtoz XML villdoe 

Ouo un documento XMI esté bien lomudo significa une sigue las normas di* 
codificación XMI pero olio no implica une sea un documento válido I I ejem¬ 
plo mostrado en la figura 19.5, por ejemplo, es un documento XMI bien forma¬ 
do, pero a juzgar por su estructura posiblemente no sea \ álido. ¿Por qué? Observe 
que algunos producios cuentan con dalos de detalle, mientras que otros no. I o 
lógico seria que todos siguiesen la misma estructura, 

5r no se cuenta con una definición previa do la estructura del documento 
XMI lo que se conoce como una DTD o un esquema, es posible incurrir en fa¬ 
llos que harían que el documento no fuese válido, a pesar de que sj estuviese 
bien formado. Puede realizar la siguiente prueba: partiendo del ejemplo de la 
figura 19.5 añada a la lista de distribuidores del primer producto una pareja 
<Edi torial >xxx</Edi tor ia 1> Al visualizar el documento podrá ver que 
no se genera error alguno, va que el documento está bien formado No obstan¬ 
te, no es lógico que en el interior de una lista de distribuidores de un prodiu to. 
que además no es un libro, exista una entrada correspondiente a una editorial 

l a única turma de evitar este tipo de fallos consiste en utilizar una DTD o 
un esquema, que no es más que un documento XML en el que se indica cuál de¬ 
be ser la estructura de lies documentos que se ajusten a dicha definición. Puede 
disponerse de una DI D ■> un esquema de dos formas: creándolo uno mismo o 




adquiriéndolo de terceros. Actualmente, \ t omo se indicaba al inicio del capi¬ 
tulo, existen decenas de empresas que, de forma conjunta, están creando esque¬ 
mas para los tipos de negocio mas habituales, Esto contribuirá a que existan 
unos esquemas estándar para determinadas tareas como, por ejemplo, la ges¬ 
tión de pedidos entre empresas. 

C omo conclusión de lo explicado en este v el punto anterior, resumir que un 
documento XMI debe estar bien formado, lo cual no implica que sea un docu¬ 
mento válido. Para validar un documento XML es necesario disponer de una 
DTD o un esquema, que podemos crear nosotros mismos si no existe una que 
se ajuste a nuestras necesidades. Un documento XML válido siempre sera un 
documento bien formado. 

Analizadores de XML 

Un documento XMI es, como va ha podido ver. un archivo de texto en el 
que se utilí/a un cierto conjunto de caracteres. Para extraer la información con¬ 
tenida en dicho documento, adaptándola a la estructura que puede deducirse 
de él mismo, se utiliza un analizador o /wrser. Dada la relativa simplicidad de 
los documentos XMI escribir un analizador no es una tarea compleja en exce¬ 
so. No obstante, no tiene por que escribir su propio analizador va que hav múl¬ 
tiples disponibles para varias plataformas v escritos en distintos lenguajes. 

Los analizadores XML. se agrupan en dos categorías: validantes v no vali¬ 
dantes. Los analizadores no validantes, que son los más sencillos, tan solo com¬ 
prueban que el documento XMI. este bien formado. I os validantes, ademas, 
comprueban si el documento se ajusta a la estructura definida en la DTI) o es¬ 
quema correspondiente, comunicando si el documento es o no valido. 

Una vez que el documento se ha analizado y comprobado, existen distintos 
medios para acceder a la información, va sea obteniéndola o modificándola. 
I os dos métodos mas conocidosson SAX (Simple ATI for XMI ) v DOM (Documcnl 
UbfCít Müdcl). Mediante SAX es posible manipular los datos del documento 
XML de una forma bastante simple, como su propio nombre indica, utilizando 
manejadores v llamando a métodos. DOM, por el contrario, es un modelo je¬ 
rárquico de objetos generado a partir de la estructura del documento XMI , sien¬ 
do mucho mas flexible \ potente. 

I rabajando con Visual Basic Nt T en un sistema Windows actual, como ya 
lia podido ver. basta con usar el editor de XML para escribir el código y la pa¬ 
gina Data para acceder a los datos previa comprobación del documento. Usan¬ 
do el menú emergente asociado al documento XML. en la ventana Explorador 
de soluciones, puede ejecutar la opción Generar y examinar para validar el do¬ 
cumento y verlo jerárquicamente, como en Internet Explorer, pero sin salir de 
Visual Basic .NEI (véase figura IM.7). 

Validación de documentos 

Un documento XML, según se ha dicho antes, puede estar bien formado v, 
sin embargo, eso no implica que sea valido. En los siguientes puntos explicamos 



cómo usar una DTD para validar documentos, introduciendo también nuevos 
conceptos como los atributos. 
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Figura 19.7. Desde el entorno de Visual Basic NET podemos validar 
los documentos XML 


Nota 

Desde el surgimiento de XML ei estándar para definir su estructura ha sido 
el uso de las DTD. lo cual hace que existan muchas definiciones de este 
tipo. Actualmente, sin embargo, el estándar XSD hace mucho más fácil la 
creación de esquemas XML. Conocerá básicamente XSD más adelante en 
este mismo capítulo. 


bn los punios previos se ha indicado qué era un documento XMI bien for¬ 
mado v qué un documento válido, haciéndose hincapié en las diferencias enlre 
ambos términos, también se ha visto que existen analizadores XMI validantes 
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y no validantes. Los primeros comprueban que el documento esté bien forma¬ 
do v, además, que sea valido. I .os segundos, por el contrario, tan sólo verifican 
si el documento esta bien formado. 

Aunque es posible verificar manualmente la corrección de un documento, 
no se trata desde luego de un método práctico, sobre todo cuando se trata de 
documentos extensos y, ademas, elaborados por distintas aplicaciones o usua¬ 
rios. Lógicamente, es mucho más cómodo v eficiente utilizar un analizador va¬ 
lidante Lste, no obstante, necesita conocer las reglas que rigen el documento, 
de lo contrario no sabrá si es o no válido. 

El método utilizado para facilitar las reglas al analizador consiste en escri¬ 
bir una definición de tipo de documento, conocida abreviadamente como DTD 
No es necesario escribir una DTD nueva para cada documento XML. De hecho, 
uno de los mayores objetivos actuales de muchas empresas es crear DTDs es¬ 
tándar que puedan ser usadas para el intercambio de documentos en formato 
XML. Una DTD generalmente se almacena en un archivo independiente, aun¬ 
que también puede facilitarse integrada en el propio documento XML. 

¿Qué ce una DTD? 

I isicamente, una DTD es un documento con estructura similar a un documen¬ 
to XML. El contenido, sin embargo, no son datos propiamente dichos, como en 
el caso de XML, sino indicaciones acerca de la estructura de un determinado ti¬ 
po de archivo. 

A pesar de que una DTD puede parecer, sobre todo al principio, relativa¬ 
mente compleja, en su formato más básico no es más que una enumeración de 
los elementos que podrán existir en un documento XML, indicando el tipo de 
cada uno de ellos. C ada elemento se describe en el interior de una etiqueta 
<! ELEMENT>, en la cual se incluirá el nombre del elemento y, entre paréntesis, 
su tipo o la lista de elementos que podrá contener. 

Como es obvio, antes de poder escribir una DTD es preciso un análisis y, 
posiblemente, una plasniación gráfica de la estructura del documento que quie¬ 
re definirse. Partiendo de este trabajo, escribir la DTD no será una tarea espe¬ 
cialmente compleja. 

En lugar de describir teóricamente cuál sería la estructura de una DTD, de¬ 
finición que puede encontrar en cualquier momento en la especificación del es¬ 
tándar. vamos a ver en la práctica cómo crear una DTD. Esta nos servirá para 
validar el documento XML utilizado anteriormente como ejemplo, documento 
que contenía una lista de productos. 

Análieíe de I a estructura de I documento 

El ejemplo estará basado en el documento XMI usado anteriormente, conte¬ 
niendo una lista de productos de un hipotético comercio. Como puede verse 
en la figura 19.5, existí* un nodo raí/, <ListaProductos>, que contiene a 
otras dos: <Sof Lware> v <Libros>. Ambas sirven como contenedores de va¬ 
rias etiquetas. <Producto> en el primer caso v <Libro> en el segundo. 

Algunas etiquetas <Producto> contienen directamente un dato en su inte¬ 
rior: el nombre del producto. Otras sirven como contenedor de las etiquetas 



<Nombre>. <Descripcion>. <Fabricante> v <Distribuidores>. en el 
caso de los productos de software, o <Titulo>, <Autor> v <Editorial> si 
el producto es un libro Validar un documento de esto tipo resultaría relativa¬ 
mente complejo, puesto que las etiquetas <Producto> y <Libro> no siguen 
un patrón lijo de comportamiento. 

I ras remodelar la jerarquía de elementos y pensar la relación existente entre 
ellos, una estructura mucho más lógica podría ser la mostrada en la figura 19.8. 
Sigue existiendo un elemento raí/ can tenedor de otros dos, pero los problemas 
que existían con los elementos <Producto> v <Libro> desaparecen por com¬ 
pleto. Esta representación gráfica y parcial de la estructura nos servirá para es¬ 
cribir la DID que, a su vez, se utilizará para validar el documento. 


ListaProduetos 


Software 

Producto 

Producto 

Nombre 

Descripción 

Fabricante 

D(8tnbuidore8 

Nombre 

Descripción 

Fabricante 

Distribuidores 

Libros 

Libro 

Libro 

Titulo 

Autor 

Editorial 

Título 

Autor 

Editorial 


Figura 19.8. Estructura de nuestros documentos XML 

No hace falta decir que el documento XMI del ejemplo que estamos ufili 
/.ando, según se puede ver en la figura 19.S, no cumple con la estructura de la 
figura 19.8 I sto significa que. (ras escribir la DI D v aplicarla, el analizador 
nos comunicara que no se trata de un documento XMI valido, a pesar de que 
este bien formado. 

I IrJborde ipil dr . : | V 1 D 

leniendoa la vista la ligura |9 8, veamos cómo podemos elabora i la delini 
cion tic tipo de documento para las listas de productos que gestionaran mies 




Iras aplicaciones. Como se ha indicado anles, cada uno de los elementos que 
aparecen en la mencionada lisura se traducirá en una etiqueta <!ELEMENT>, 
en la cual se indicará el contenido que puede tener el elemento. 

I I primer elemento, actuando como raí/ de todos los demás, es Lista- 
Productos. F.ste contendrá en su interior dos subelementos. Software v 
Libros. Observe el término conlnnlni, casi imperativo. No se ha dicho podra 
tonlcnrr, en cuyo caso los subelementos anteriores podrían o no existir en la lis¬ 
ta de productos. I ijese también en la imposibilidad de que se repitan los sub 
elementos. ListaProductos tan solo contendrá en su interior dos elementos, 
los va indicados, ni uno mas ni uno menos. 

I.a etiqueta OID con la que se describiría el elemento ListaProductos 
seria < 1 ELEMENT ListaProductos (Software, Libros )>. 1 ras la marca 
de proceso ! ELEMENT se indica el nombre de la etiqueta raíz y, entre parénte¬ 
sis, el mimbre de las etiquetas que contendrá. 

A diterencia de ListaProductos, los elementos Sof tware y Libros pue¬ 
den contener un número indeterminado de subelementos aunque, .eso si. todos 
ellos con la misma estructura. Dentro de un elemento Software existirán uno 
o más Producto, mientras que en el interior de un Libros el elemento repe¬ 
titivo sería Libro. La correspondiente entrada en la DID. por ejemplo en el 
caso del elemento Software, sería <1 ELEMENT Software ( Producto* ) >. 
Observe el símbolo + dispuesto detrás de Producto, el es el que especifica que 
el elemento se repetirá tantas veces como sea necesario. 

I «i definición Di D de un Producto o un Li bro es bastante sencilla. Basando- 
nos en la delinicion anterior de ListaProductos, lo único que habría que ha¬ 
cer sería enumerar los elementos que habría en su interior, indicando la posible 
re peí ilion. 

Un el ultimo nivel se encuentran los elementos que contienen datos, como 
Descripción o Autor. I'stas etiquetas no servirán como contenedoras de 
otras, sino que contendrán un texto. Fste tipo de dato se identifica en una D I D 
como #PCDATA. Asi, la definición del elemento Titulo, por ejemplo, quedaría 
como <1ELEMENT Titulo (#PCDATÁ)>. 

C on lodo, la DID completa para nuestro documento seria la mostrada a 
continuación U1 sangrado no es algo obligatorio, pero avuda a identificar los 
distintos niveles de contención de unos elementos en otros. 

<!ELEMENT ListaProductos (Software, Libros)> 

!ELEMENT Software { Producto M> 

<!ELEMENT Producto (Nombre, Descripción, Fabricante, 

Distribuído res > > 

<!ELEMENT Nombre (ÍPCDATA)^ 

< ! ELEMENT Descripción (|(PCDATA)> 

<fELEMENT Fabiicante (#PCDATA>> 

• 'ELEMENT Disti i bu idoies (Distribuidort)> 

<!ELEMENT Distribuidor íBPCDATAi> 

'l ELEMENT Libros (Libro*)> 

<!ELEMENT Libro (Titulo, Autor, Editorial)> 

"¡ELEMENT Titulo ( H PCDATA } - 
<! ELEMENT AtiLor f#PCDATAi> 

*!ELEMENT Editorial f kPCDATAl> 



Bste texlo lo almacenaríamos en un documento con extensión DTD que, ge¬ 
neralmente, estará alojado en el mismo servidor desde el que se obtenga el do¬ 
cumento XML. 

Cómo aplicar una OTO a un documento XML 

Una definición de tipo de documento no es útil per se, aunque puede usarse 
como referencia para preparar los documentos XML. La finalidad de una DTD, 
tal como ya se ha indicado previamente, no es otra que servir a un analizador 
validante como referencia, facilitando la revisión y validación de cualquier do¬ 
cumento XML que se adapte a dicha DTD. Los documentos XML basados en 
una cierta DTD tienen dos opciones a la hora de indicarlo al analizador: incluir 
la DTD completa en el propio documento XML o hacer referencia a una DTD 
externa. El primer caso es útil cuando el propio documento XML es una singu¬ 
laridad, que no va a repetirse v, consecuentemente, consta de una DI D no vá¬ 
lida en otros casos. El segundo, mucho más común, es aplicable siempre que la 
DTD vaya a utilizarse en múltiples documentos. Manteniendo en éstos una re¬ 
ferencia externa, se evitará la repetición de la DTD en cada documento 

La instrucción de proceso para especificar el tipo de documento, en el inte¬ 
rior del documento XML, es < !DOCTYPE>, que ira seguida de un ¡dentificador. 
I ras este pueden existir unos corchetes, en cuyo interior estaría contenida la 
D I D, o bien una referencia a la DTD externa. En el ejemplo siguiente puede 
ver un fragmento del documento XML, conteniendo la DTD completa. 

< :'xml versión*” 1 . 0 " ?> 

« JDOCTYPE ListaProductos [ 

< iELEMENT ListaProductos (Software, Libros)> 

<! ELEMENT Software (Producto* )> 

<!ELEMENT Producto (Nombre, Descripción, Fabricante, 

Distribuidores)> 

<1ELEMENT Nombre (#PCDATA)> 

<!ELEMENT Descripción (#PCDATA)> 

<!ELEMENT Fabricante (IPCDATA)> 

<!ELEMENT Distribuidores (Distribuidor+)> 

<!ELEMENT Distribuidor (#PCDATA)> 

<!ELEMENT Libros (Libro*)> 

<:ELEMENT Libro (Titulo, Autor, Editorial)> 

<!ELEMENT Titulo ( # PCDATA)> 

<!ELEMENT Autor («PCDATA)> 

<!ELEMENT Editorial (IPCDATA)> 

r> 

«Li s t a P r od u c t os > 

< Software'* 

<Producto> 

<Nombre>Visua1 Basic .NET</Nombre> 

- Descripción>Fntorno de desarrollo RAD basado 
en RASIC</Descripción> 


A continuación se muestra el mismo fragmento, pero en este caso con una 
referencia a la DTD externa, lista se ha almacenado en un archivo llamado 
ListaProductos. dtd, que contiene la detinición mostrada anteriormente. 



<?xml versión»" 1.0"?> 

< ! DOCTYPE List: aProductos SYSTEM “I.istaProductos . dtd" > 

ListaProductos> 

<Sof tware> 

<Producto> 

<Nombre>Visua1 Basic .NET</Nombren 
‘Descripción>Entorno de desarrollo RAD basado 
en BASIC</Descripción> 


F.n rualquiora de los dos casos, el documento XMI. ya cuenta con una DI D 
en la que se especifica la estructura que debería tener ese documento Un ana¬ 
lizador no validante no usaría dicha información para nada, por lo que el do¬ 
cumento mostrado anteriormente en la figura 1 C E5 seguiría siendo correcto, al 
estar bien formado. Un analizador validante, por el contrario, generaría un 
error, por ejemplo al encontrar que una etiqueta <Producto> contiene direc¬ 
tamente el nombre del producto, en vez de contar con las etiquetas <Nombre> 
<Fabricante>, etc. 

Validación dé\ documento 

Tras añadir la DTD, ya sea en el interior del documento XMI . o haciendo re¬ 
ferencia a ella, habrá que proceder a la validación. Tara ello puede utilizarse 
un analizador validante, de los cuales hav bastantes disponibles en Internet, 
también puede, simplemente, abrir el documento XML con algún editor o vi¬ 
sor de este tipo de documentos. 

A pesar de que no disponga de ningún analizador ni editor, si tiene instalado 
en su sistema la última versión de Internet Explorer va cuenta con un analiza¬ 
dor validante. Este puede ser usado desde cualquier herramienta de desarro¬ 
llo, asi como desde un <crifU. Aprovechando la existencia de WS11 (Witnlou< 
Scripliug Ho>() en Windows, que permite la ejecución directa de guiones en 
VBScript. podríamos servirnos de un <cript como el mostrado a continuación. 


Set DocXML = CreateObject("Microsoft.XMLDOM") 

!*«•» i .• , t.'l.i .r, o ,, ||.* * x? r- 

DocXML.validateOnParse * True 

If Not DocXML.Load("ListaProductos.xml") Then 

.1 — 4 . o, «■ 

MsgBox "Hay errores en el documento " & DocXML.url 

Else 

MsgBox "El documento " & DocXML.url & ” es correcto" 

End If 


Nota 

Puede añadir un archivo VBScript al proyecto que tenga abierto usando la 
opción adecuada de la ventana Agregar nuevo elemento. Usando la opción 
Generar y examinar del Explorador de soluciones, anteriormente indicada. 



y pulsando el botón Abrir de la ventana que aparece ejecutaremos el guión 
y veremos el resultado. 


El analizador XMI incorporado en Internet Explorer es un componente At 
tiveX. que puede ser usado prácticamente desde cualquier aplicación Windows 
En el citado guión, lo que hacemos es crear una copio de ese componente, dan¬ 
do valor a una propiedad con la que se indica que deseamos validar el docu¬ 
mento, ademas de comprobar si esta bien formado. A continuación, utilizarnos 
el método Load( ) para abrir el documento, un documento que sabemos que 
existe en el disco y que no habrá problemas en recuperar. Si el valor devuelto 
por dicho método es False, algo que comprobamos con el operador Not, indi¬ 
cara que el documento no es válido. I a validez o no del documento se comuni¬ 
ca mediante un mensaje. 

I ras guardar el guión en un archivo, por ejemplo con el nombre Val ida- 
cion.vbs, bastara con hacer doble clic sobre él desde el Explorador de Windows 
para ejecutarlo I I resultado sera un mensaje como el de la figura 1*1.9. I I docu 
mentó XMI no es válido, puesto que su estructura no cumple con la definición 
de la m n 
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Figura 19.9. Nuestro script nos indica que hay errores en el documento XML 

Tendríamos que hacer algunos cambios, dejando el documento tal v como 
se muestra en el listado siguiente Al efectuar la validación, ejecutando de nue¬ 
vo el guión VBScripI, el mensaje obtenido ahora sería el de la figura \v .10. I I 
documento si es correcto v valido, va que se ajusta a las directrices de la D I D. 

* j'xml versión*"1.0" encoding* M utf-8" ?> 

< !DOCTYPE Lista Productos SYSTEM "ListaProductos.dtd"> 

* ListaProductos* 

• Software > 

<Producto > 

<Nombre>Visua1 Basic .NET</Nombre * 

Descripción>Entorno de desarrollo RAD basado 
en BASIC< Descripción* 

• Fabricante >Microso1t</Fabricante > 

•■Distribuidores > 

<Distribuidor>Danysoft</Distribuidor- 
<Distribuidor>Dat abase DM< /Distribuidor > 

</Distribuidores * 

< / Producto 
• Producto-* 

<Nombre>Visua1 C+• .NET* Nombre* 

- Descripción ••Comp i J ador de C+ + para la plataforma 
.NET< /Descripción > 

• Fabricante *Microsoft • /Fabricante 




< Distribuidor es- v 

<Distribuidor>DanySof t</Distribuidor.» 

<Distribuidor>Act_ion< / Distribuidor > 

</Distribuidores> 

</Producto > 

< Producto > 

<Nombre>Visual C# .NFT</Nombre * 

<Descripción>Nuevo lengua le orientado 
a r:oinponentes</Descr ípcion > 

1 Fabricante>Microsof t</Fabricante > 
c Distribuidores * 

<Distribuidor>Danysoft</Distribuidor> 

<"Distr i bu i do r>D a taba se DM< /Distribu idor > 

</Distribuidores> 

</Producto> 

<Producto> 

< Nombre >V i slia l Ti .NET r - - Nombre • 

<Descripcion>Lenqua-je Java para ia plataiorma 
.NET</Descripcion> 

< Fabricante >M±crosof t</Fabricante 

< Distribuidores^ 

<Distr ibuidpr>En pi epa ración*- / Distribuidor-» 

«Distribuidor>En preparar on</Distribu idor> 

</Distribuidores> 

</Producto > 

</Software > 

• Libros» 

< Libro > 

<Titu,lo>Progr amacion en Windows 2000</Titulo> 

<Autor>Francisco Charte</Autor > 

< Editorial>Anaya Multimedia</Editorial> 

< / Li.bro> 

<Libro> 

• Titulo >Como proqramar con Visual Basic para torpes^/Titulo-' 
<Autor>Fia «cisco Char te</Autor> 

< Editorial>Anaya Multimedia< Editorial> 

< /Libro'» 

• Libro> 

<Titulo>Prograroación con Visual Basic .NET</Titulo 

• Autor >Franc i seo Cha i te< / Autor » 

<Editorial>Anaya Mullí media</Editorial> 

</Libro> 

<Libro> 

<Titulo'Programación con Visual Studio . NET*/Titulo-* 

<Autor Jorge Serrano y Francisco Charte</Autor» 

<Editorial>Anaya Muítimedia< /Editorial> 

< / L i b ro ■» 

</Libros> 

«/ListaProductos • 


VBScrlpt 
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Figura 19.10. Tras los cambios nuestro documento XML si es válido 





Atributos o propiedades 

Ademáis de otros elementos v datos, cada una de las etiquetas de un din límen¬ 
lo XMI puede contar también con atributos, listos pueden ser considerados 
ionio propiedades del elemento, que definen alguna característica. lili el ejem¬ 
plo que estamos utilizando, una propiedad de un producto software podría ser 
el tipo de maquina al que va destinado: PC, Mac, olí Para los libros, podría 
existir un atributo que indicase su categoría: ofimática, programación, etc. 

I n HTML existen marcas con atributos. La morca <a>, por ejemplo, cuenta 
con un atributo llamado href cuyo valor determina el URl del sitio web al que 
apunta un enlace I a marca <font>, por mencionar otro caso conocido, cuenta 
con atributos como face y size para establecer el tipo de letra v su tamaño. 
I n lodo caso, el formato de las marcas ion atributos es siempre el mismo: 

■enarca at ribuio*"valor" atributo='*valor H > 

De lorma análoga, en XMI podrían introducirse etiquetas con atributos, co¬ 
mo en el fragmento siguiente Hl único inconveniente es que. en principio, a los 
atributos Tipo v Categoría podrían asignársele cualquier valor. C omo seria 
de esperar, es posible especificar qué valores son los válidos mediante Lis en¬ 
tradas apropiadas en la DTD. 

^ListaProductos 
<Software > 

- Producto Tipo^"Mac'*> 

<Kombre>Vlsua1Aqe Cl* 4</Nombre> 

• Descripción>Entorno de desarrollo .lava</Descripcion 
<Fabricante>lBM</Fabricante > 

'Distribuidores > 

< Distribuidor > 1 BM< /Distribuidor-» 

</Distribuidores> 

</Productos 

< Producto Tipo-**PC"> 

<Nombre>Visua1 Caí233; Java 3</Nombre> 

<Descripcion>Entorno de desarrollo Java'/Descripción> 

-"Fabricante >SymarU er< / Fabricante» 

<Distribuidores> 

Distribuidor k Symantec</Distribuidor - 
</Distribuidores > 

< i Producto 
<i Software > 

• Libros > 

- Libro Cateqoria=”Programaeion M > 

- TituioProgramael U/4 l;n en Windows 2Ú00</Titulo> 

- Autor>Franciseo Charle 0jeda</Autor> 

- Editorial »Anaya MuItimedia</Editorial» 

</Libro> 

Si para definir el contenido de un elemento se utiliza Id eliquel.i < 1 ELEMENT>. 
p.ird hacer lo propio con los atribuios existe la etiqueta < i ATTLIST>. lista es 
peiilicara el nombre do! atribulo, asi como los posibles valores de este en caso 



de qlie sea un conjunto limitado. En principio, la existencia de un atributo en la 
DTD no implica que en el documento XML dicho atributo se incluya siempre. 
Si deseamos que esto sea así, que el atributo sea obligatorio, tan sólo hay que 
finalizar la declaración con la palabra ffREQUIRED. 

En el listado siguiente puede ver una segunda versión de la DTD original, 
en este caso incluyendo la definición de los atributos posibles. Puede aplicar es¬ 
ta nueva DTD a una versión modificada del documento XMI anterior, en el 
que se incluyesen los atributos necesarios, El mismo guión de validación le ser¬ 
viría también para comprobar el documento. 

< S ELEMENT ListaFroductos (Software, Libros )> 

< !ELEMENT Software (Producto+)> 

<! ELEMENT Producto (Nombre, Descripción, Fabricante, 

Distribuidores)> 

-iattlist Producto Tipo (PC | Mate | Consola! «REQUI red 
v i > 

<!ELEMENT Descripción («PCDATA)> 

<!ELEMENT Fabricante («PCDATA)> 

<! ELEMENT Distribuidores (Distribuidor+)> 

<!ELEMENT Distribuidor ( IPCDATA)> 

<! ELEMENT Libros (Libro»)> 

<! ELEMENT Libro (Titulo, Autor, Editonal)> 

<I ATTLIST Libro Categoría (Sistema | Ofimatica | Programación) 

I REQUIRED > 

<! ELEMENT Tit.nl O < « PCDATA ) > 

<! ELEMENT Autor ( «PCDATA)> 

<! ELEMENT Editorial ( «PCDATA) > 


Introducción a XSL 


Ya conocemos la estructura de un documento XML. lo que es una DTD y co¬ 
mo validar un documento. La visualización de los documentos, hasta ahora, 
siempre se ha efectuado directamente en el editor de Visual Basic .NI I o en In¬ 
ternet Explorer en forma de árbol jerárquico. Internet Explorer incorpora no 
sólo un analizador XML, sino también una hoja de estilo XSI por defecto, que 
muestra los documentos de este tipo en forma de árbol jerárquico. 

La visualización directa del código XML no es lo habitual, ya que el formato 
puede no ser siempre el más apropiado. Mediante XSL es posible convertir un 
documento XMI en un documento HTML, dando formato a los dalos según 
interese en cada caso. 

Los documentos XML pueden ser transformados en HTML o cualquier otro 
formato gracias a la existencia de XSL. En los siguientes puntos vamos a cono¬ 
cer las bases de XSI . 

Transformación de documentos 


Los documentos XML son autodescriptivos pero, a pesar de ello, su forma¬ 
to no es el más apropiado para generar informes, va sean éstos impresos o en 



forma de documentos web. Mediante XSL, como veremos a continuación, es 
posible generar documentos 111MI a partir de documentos XML, aplicando el 
formato que se desee. 

lin un principio puede parecer que XSI. es un lenguaje para aplicar hojas de 
estilo a los documentos XMl , de manera similar a t'SS ((_//m m/ñ/y S/i//i* S/orM. 
La realidad, sin embargo, es que XSI es mucho más potente, facilitando la selec¬ 
ción, filtrado v ordenación de los datos, aparte de aplicarles un determinado 
formato. Por ello, v a pesar de su nombre, XSI puede considerarse más un len¬ 
guaje de transformación de documentos, desde formato XMl a oíros formatos. 
De hecho, XSI ha sido la base de XSI I que, aunque muv básicamente, conoce¬ 
rá mas adelante en este mismo capitulo. 

Al igual que XMl , XSI es un lenguaje que se utiliza para crear documentos 
listos siguen las reglas de sintaxis de XMl . Dicho de otra forma, un documento 
XSI. es un documento XMl , aunque en el se utilizan elementos predefinidos 
que permiten manipular la información. Todas Lis etiquetas en un documento 
XSL, al igual que en XMl . deben contar con sus respectivos cierres. 

I o habilual, al igual que ocurre ton las D I D que liemos conocido anterior¬ 
mente. es que los documentos XSI. se almacenen en archivos independíenles, 
siendo reJerenciados desde el documento XML. De esta forma, en la cabecera 
de un documento XMl se indicaría cuál es la DTD a la que debería ajustarse v 
el XSI necesario para transformarlo 

X5L básico 

Mas que entrar en una definición mas o menos formal de qué es XSI v cual 
es su sintaxis, información que podra encontrar en http://www.w3.org/ 
TR/WD-xsl, vamos a ver con unos ejemplos sencillos que podemos conseguir 
con XSI . Nuestro primer objetivo sera generar un documento I I I MI a partir 
del documento XMl utilizado como ejemplo en puntos previos, un documento 
conteniendo información relativa a producios de software v libros 

I a primera linea de un documento XSI es la conocida marca <?xml ver- 
sion="1.0" ?>, con la que se inicia lodo documento XMl . Para diferenciar 
al documento XSI de cualquier otro XMl , \ poder asi usar elementos de mani¬ 
pulación de dalos en lugar de introducir dichos datos, habrá que añadir la di¬ 
quela xsl: sty Lesheet, que identifica al documento como una hoja de estilo. 
Dicha marca cuenta con un parámetro, llamado xmlns (XA!/ NamcSjunr). que 
se utiliza para delinir un espacio o ámbito de nombres I ras tíos punios so lat i- 
lilará el nombre de divlu» espacio, mientras que como parámetro se entregara 
un LIRl , concretamente el L Kl. en el que se define XSL. 

II inicio de cualquier hoja de estilo XSL, por tanto, es tara compuesto por las 
dos lineas siguientes: 

<?xml versión*"1.0" ?> 

■* xsl : sty lesheet xmlnsrxsl^ ’* h t t p : / /www. w3 . org/TR / WD-xs ] " 

La etiqueta xsl: sty lesheet no es de proceso, por lo que deberá contar 
con su respectiva marca de cierre. Ln este caso se ha asignado al espacio de 



nombres el nombre xsl, que es lo habitual Podría, no obstante, asignarse cual 
quier otro nombre. Eri cualquier caso, ha\ que tener en cuenta que los elemen¬ 
tos definidos en la www. w3 . org/TR/WD-xsl. usados en el resto del documento, 
deberán ir precedidos del idontiticador del espacio de nombres. Para aplicar 
una plantilla de estilo, por ejemplo, se utili/a el elemento témplate Si el do¬ 
cumento se inicia con el fragmento anterior, dicho elemento aparecería como 
xsl:témplate 

Una hoja de estilo compuesta tan sólo de la cabecera anterior, junto con la 
etiqueta de cierre, no es que sea precisamente útil, pero va podemos almacenarla 
en un archivo con extensión XSL v hacer referencia a ella desde un documento 
XMI.. Dicha referencia se efectúa mediante una marca de proceso como la si¬ 
guiente 

<?xml-stylesheet type=" text/xsl'* href = "Est íioSimple . xsl" ? > 

lal y romo puede verse, la marca xml-sty lesheet cuenta con dos paráme¬ 
tros: type y href. Con el primero se indica el tipo de hoja de estilo, que está 
codificada en XSL en este caso, y con el segundo se facilita el URL en que se en¬ 
cuentra. 

Si el documento XMI es obtenido a través de la red desde un determinado 
servidor, normalmente su manipulación esta restringida a hojas de estilo recu 
peradas del mismo servidor v no desde cualquier otro punto, sea local o bien 
remoto. 

Cómo aplicar plantillas 

En el interior de la hoja de estile» si- aplicaran plantillas a determinadas par¬ 
tes del documento XMI Estas plantillas establecen el formato de salida de la 
información, por ejemplo generando las etiquetas 1 H ME asociadas a cada ele¬ 
mento del documento XMI 

El elemento XSI a utilizar es témplate, pudiendo aplicarse a todo el docu¬ 
mento o a una parte de el. Mediante el parámetro match se establecerá el con¬ 
junto de datos al que se aplicará la plantilla. El argumento de dicho parámetro 
será /, para seleccionar todo el documento, o bien el nombre del elemento al 
que desee aplicarse la plantilla, por ejemplo Libro. 

Entre la marca de apertura v la de cierre de la plantilla podremos introducir 
todos los elementos que deseemos aplicar, tanto de formato como de proceso. 
Los de formato serán simples etiquetas IJTML, por ejemplo, mientras que los 
de proceso serán oíros elementos, conoceremos algunos en un momento, que 
nos permitirán seleccionar datos del documento XML c introducirlos en la 
plantilla. 

Observe el código siguiente, correspondiente a una hoja de estilo XSI alma¬ 
cenada en el archivo Plantil laGeneral. XSL. I an sólo contiene una plan¬ 
tilla que se aplicará al documento completo, compuesta de varias etiquetas 
I ITML. Observe que los elementos XSL están precedidos del prefijo xsl y dos 
puntos. Esto se debe a que en la marca stylesheet se ha llamado xsl al 



espacio de nombres. Si lo hubiésemos llamado de otra forma, habría que susti¬ 
tuir el prefijo xsl por el que correspondiese. 

<?xml versión- "1 . 0" ?> 

<xsl:stylesheet xmins:xs1="http://www.w3.org/TR/WD-xsi" > 

<xsl:témplate match="/ H > 

<H1>Lista de producto9</Hl> 

<H2 >Soítware< /H2> 

<H2>Libroa</H2> 

</xsl:témplate» 

</xsl:stylesheet> 

I a hoja do estilo por sí sola no es útil, lógicamente. 1 lay que aplicarla al do¬ 
cumento XML, para lo cual habrá que incluir en éste la correspondiente marca 
de proceso ?xml -stylesheet. tal y como puede apreciarse en el siguiente 
fragmento Vamos a seguir usando en nuestros ejemplos el mismo documento 
de artículos utilizado con anterioridad. 

‘?xal versión*"1.0"?> 

< ! DOCTYPE List.aProduc tos SYSTEM " List a Produc tos2 . d td"> 

< ?xml-stylesheet type= " text/xsl ” hre f =- " P1 an t i 1 i aGenera 1 .xsl"?» 

<ListaProductos> 

‘Software > 

<Producto» 

' Nombre>Visua 1 Basic .NET</Nombre» 


Si utilizamos el editor XML de Visual Basic .NKT seguiremos obteniendo la 
misma tabla de datos con los elementos del documente» XML, pero abriéndolo 
en Internet Lxplorer podremos ver que ya no aparece la lista jerárquica con to¬ 
dos los elementos y datos del documento. En su lugar, como puede ver en la fi¬ 
gura l c t II, tan sólo aparecen los títulos correspondientes a las etiquetas III MI 
introducidas en el interior de la plantilla XSI . 

Selección de datos 


Una plantilla que genera un documento tan sólo con unos títulos, sin tomar 
la información almacenada en el documento XMI . no es nada útil. Veamos, 
por tanto, cómo podemos seleccionar los datos de dicho documento, incluyén¬ 
dolos en el interior deesa plantilla genérica para crear otra nueva, relativamen¬ 
te simple pero más útil. 

Puesto que la estructura de todo documento XML suele estar compuesta de 
patrones repetitivos, en nuestro caso elementos Producto v Libro queso re¬ 
piten en todo el documento, en XSL existe un elemento de enumeración llama- 



do for-each. I ste dispono do un parámetro, que so llama select, cuyo ar¬ 
gumento determinará que dalos se van a elegir l a etiqueta <xsl: for-each 
select="ListaProductos/Software/Producto" >, por ejemplo, elige 
todas las entradas Producto que lu\ en la rama Software de la Lista- 
Productos Como puede deducirse, este elemento XSI lo que hace es crear un 
huelo en el cual los elementos siguientes, hasta encontrar la etiqueta de cierre, 
se repiten una ve/ por cada entrada Producto. 
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Figura 19.11. Resultado que genera la plantilla XSL simple 


Con el elemento for-each, por lo tanto, podemos determinar a qué datos 
afectará el huele I n el interior de éste, no obstante, necesitaremos recuperar 
información de los apartados que forman cada Producto, como el nombre, 
distribuidor, fabricante, etc. Con este lili se utiliza el elemento value-of que, 
al igual que el anterior, cuenta con un parámetro select que servirá para in¬ 
dicar el dato a recuperar. 

Usando los elementos for-each v value-of podemos crear una hoja de 
estilo comii la mostrada a continuación, partiendo de la que habíamos escrito 
previamente. 

Observe que existen dos construcciones for-each, una para recorrer los 
productos de software v otra para los libros. I n el interior de cada una de ellas 
simplemente se introduce el nombre del producto o titulo del libro, además de 
unas etiquetas 11 IMI para separar cada elemento del siguiente. 




<?xml versión - " 1 . 0" ?> 

«'xsl rstylesheet xmlns:xsl = "http: / / www . w3 . oiq /TK/WD-xs 1" > 

*'xsl : témplate match*"/" > 

<Hl>Lista de productOB</Hl> 

<E2 >Sof twa re</H2 > 

<xs1:for-each se 1 ect = "ListaProducto»/SofLwa re /Producto" > 

<P><xsl : value-of select = “Noinbre u /></P> 

< /xsl:for-each> 

<H2 >Libros</H2> 

<xsl : for-each seief'i * "ListaProductos / Libros /Libro” order-by = "Autor "> 

< P-<xs 1: value-of select-«"Tituio" /></P> 

</xsl:for-each> 

</xsl:template> 

</xsl:stylesheet> 

Aplicando esta nueva hoja de estilo al documento XML, para lo cual bahía 
que sustituir la reterencia que hay en éste, ahora obtendremos un resultado si¬ 
milar al de la figura 1^.12. I I documento es bastante mas útil e. incluso, mas cla¬ 
ro que la visuali/acion directa del árbol jerárquico XML, sobre todo para una 
persona que desconozca dicho lenguaje. 
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Figura 19.12. Resultado que genera la nueva plantilla XSL 




El resultado obtenido sigue siendo simple, pero realmente no necesitamos 
conocer ningún elemento XSL más para generar documentos mucho más elabo¬ 
rados. En el listado siguiente puede ver otra hoja XSL en la que tan sólo se usan 
los elementos ya conocidos, pero en la que se ha introducido mas formato utili¬ 
zando etiquetas 111 ML. Básicamente, se crea una tabla con unos títulos y en las 
celdillas centrales se muestran algunos datos del documento XML original. El 
resultado (véase figura 19.13) es mucho mejor que el anterior, valido para una 
presentación al usuario. 

<?xml versión» M 1.0" ?> 

< xs 1: stylesheet xmlns:xsl“"http: / /www .w3.org/TR/WD-xsl > 

<xsl:témplate match="/“ > 

<TABLE STYLE="border:lpx solid”> 

<TR> 

<TD COLSPAN* ” 2 ’* AT,TGN*"oen1.er " BGCOLOR-® M silver"> 

<Hl>Li.Bta de productos</Hl> 

< / TD> 

</TR> 

<TR> 

<TD COLSPAN*”2” ALIGN="center" BGCOLOR»"aqua"> 

<H2>Software</H2> 

</TD> 

</TR> 

<TR BGCOLOR*"ocean M > 

<TD ALIGN=’ , center"> 

<H4>Nombre</H4> 

< / TD> 

< TD AL1GN="canter"> 

<H4>Fabrícante</H4> 

</TD> 

</tr> 

<xsl: for-each se lect='*l,i8t aProductos/Sof t.ware/Producto'* > 

<TR BGCOLOR®* ” ocean ” > 

<T0Xxb1 : value-of se iect = **Nombre" /></TD> 

<TD><xsl : value-of select»"Fabrican«:e" /></TD> 

</TR> 

</xsl:for-each> 

<TR> 

<TD COLSPAN= H 2” ALlGN» M center" BGCOLOR»"aqua-> 

<B2>T.i bros< / H2> 

< / TD> 

< /TR> 

<TR BGCOLOR* " ocean "> 

<TD ALTGN = "cent.er " > 

< H 4 >T i t u 1 o< / H 4 > 

< / TD> 

< TD ALIGN*"center"> 

<H4>Autor</H4> 

</TD> 

</TR> 



<xsl : for-each se i ec t * “ Lx s t aPioductos / í. ibros/Libro 
order-by®"Au tor"> 

<TR BGCOLOR="ocean"> 

<TD><xsl:value-of se lect^= "Ti t ulo" /></TD> 
<H>><xsl:value-of seiect-"Autor" /></TD> 

</TR> 


</xsl:£or-each' 
•/TABLE> 

</xal:template> 
c /xa1 : stylesheet > 
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Figura 19.13. La nueva plantilla XSL genera una tabla HTML mucho 
más legible 

Las posibilidades de X5L 

i.in solo con tros elementos XSL, los explicados témplate, for-each \ 
va Lue-of. es posible convertir cualquier documento XMI en una página II I MI 
tan compleja como se desee. Las posibilidades de XSL, no obstante, no termi¬ 
nan aquí I (av más elementos de manipulación de datos, así como un complejo 
v el ¡ciento lenguaje de comparación de patrones que facilita la selección tic in- 
lormación v loma de alternalivas 

Al seleccionar los conjuntos de datos, con el elemento for-each, es posible 
ordenarlos según el criterio que nos interese. Podríamos, por ejemplo, ordenar 
los productos por fabricante o bien los libros por autores. C on elementos como 














choose, when v otherwise os posible plantear alternativas, o tomar decisio¬ 
nes en c! argot de los programadores. Esto puede utilizarse, por ejemplo, para 
aplicar un formato condicional a los datos. Mediante el elemento eval podría¬ 
mos evaluar expresiones incluyendo el resultado en el documento a generar. 

Además de los elementos propiamente dichos, en XSL existe una serie de 
métodos predefinidos que facilitan, por ejemplo, la salida de fechas, horas y 
números, así como la obtención de los índices que identifican a cada uno de los 
elementos del documento XML. 

introducción a XSP 


Previamente, en este mismo capitulo, hemos visto cómo la estructura de un 
documento XMI puede representarse mediante una DTD que, además, puede 
ser utilizada por el analizador XML para efectuar el proceso de validación. En 
principio las DTD eran el único mecanismo para documentar la estructura, pe¬ 
ro durante meses un grupo de trabajo del W3C se ha centrado en la definición 
de un nuevo sistema basado en esquemas. 

Los esquemas XML son más flexibles que las DTD y se trata de un mecanis¬ 
mo que Microsoft esta potenciando en sus aplicaciones. El analizador XML de 
Microsoft es capaz de trabajar con esquemas que, como en el caso de las DTD, 
pueden alojarse en el propio documento XML o en un archivo separado al que 
se referencia desde el primero. 

Un esquema XML es en sí mismo un documento XML que, por tanto, puede 
ser procesado con cualquier analizador XML, transformado con una hoja XSL 
V mostrado en un diente como Internet Explorer. A diferencia de una DTD, en 
un esquema XMI los elementos que se definen pueden contar con tipos de da¬ 
tos, es posible extender el esquema con posterioridad y las definiciones pue¬ 
den anidarse. 

El lenguaje XSD (XA4/ Schema Defniition l.auguate) es mucho más versátil 
que DTD, contando con tipos de datos básicos, la posibilidad de definir tipos 
complejos, aplicar restricciones, etc. Además, XSD está basado en XML, mien¬ 
tras que DTD, como ya se ha visto, no se ajusta a dicho estándar. 

Un esquema XSD se inicia con la etiqueta <schema> que, habitualmente, 
suele llevar implícita la declaración de un ámbito con nombre, de forma simi¬ 
lar a lo explicado previamente para XSL l'oda la descripción, la definición del 
esquema, estará contenida entre las marcas<schema> y</schema>. La estruc¬ 
tura basica, por tanto, seria esta: 

< xs: schema xmlns:xs = M http: / /www .w3.org/2001 / XMLSchema " 

<xs:detinición de elementos> 

</xs : def ín ición de elemenl.os> 

</xs:schema > 

La definición de cada elemento se efectúa con la marca <element>. Esta irá 
acompañada como mínimo de dos atributos: Ñame y Type, indicando el nom¬ 
bre del elemento y su tipo. Los tipos básicos son números enteros y con parte 



decimal, cadenas, lechas, etc. Prácticamente se contempla el uso de cualquier 
tipo de dato existente en los lenguajes actuales. 

<xs¡element name= "Ti tulo" type*”xs:strinq"/> 

Con la etiqueta anterior, por ejemplo, se define un elemento que tendrá por 
nombre Titulo que contendrá una cadena de caracteres. Vea que se usa el pie- 
lijo xs como nombre del espacio que asumimos se ha definido previamente. 

F.n caso de que el tipo no sea tan simple como un número o una cadena, sera 
necesaria una descripción indicando los elementos de que se compone. Rn este 
caso la etiqueta que nos interesa es <ComplexType> que, como vera en el frag¬ 
mento siguiente, dispone de un atributo ñame que permite indicare] nombre del 
tipo En su interior se definirán los elementos, según la sintaxis de la etiqueta 
<eleraent> que acaba de explicarse, v, en caso necesario, también los atributos. 

<xs:complexType name= "Lj-broType "> 

• xs:aequence> 

<xs:element ñame * **T i tul o** t y pe=" xs : st r i ng " / > 

^xsrelement ñame* "Autor " type“"x3 : stnnq"/ > 

< xs : eleinent name= n Edi toria 1 " ty pe* " xs : st r irig M /> 

</xs:sequence> 

* xs : attribute name*"CaLegoria" type*"xs : str ing" t> 

</ xs:complexType > 

Obsérvese que la definición de lo^ elementos está contenida en una marca 
<sequence>. De esta lorma se indica que los elementos deben aparecer en ese 
orden v no en cualquier otro. Fíjese también en que la definición del único atri¬ 
buto existente es idéntica a la de los elementos, simplemente se sustiluve el ele¬ 
mento <element> por <attribute>. 

A partir de este momento, podríamos usar LibroType como cualquier otro 
tipo básico, utilizándolo en la definición de nuevos elementos. ' 

En caso de que un elemento deba repetirse, como si tuese una lista o una 
matriz, aparte del nombre y el tipo habrá que utilizar el atribulo minOccurs, 
maxOccurs o ambos. En la siguiente definición, por ejemplo, se indica que el 
tipo D i stribu idoresType estará compuesto de uno o mas nombres de distri¬ 
buidor- Observe que el valor de maxOccurs es la palabra unbounded. indi¬ 
cando asi que no hav un máximo preestablecido. 

<xs:complexType ñame*”DistribuidoresType"> 

<xs:sequence» 

<- xs : element ñame*"Dist riba idor " type= " xs : st rir»g " 
minOccurs="1" maxOccurs*"unbounded"/> 

</xs:sequence > 

</xs:complexType > 

El editor de esquemas XML de Visual Basic .NET 

Visual Basic NET cuenta con un editor de esquemas que podríamos califi¬ 
car de diseñador puesto que, de una forma casi visual, podemos establecer los 



tipos de dalos y sus elementos, asi como las relaciones que darán lugar a la je¬ 
rarquía de! documento. I’ara añadir un nuevo esquema XM1. nos serviremos, 
como es habitual, del cuadro de diálogo Agregar nuevo elemento mostrado en 
la figura 19.14. Automáticamente se abrirá el diseñador de esquemas en el que, 
utilizando las opciones del menú emergente, iremos añadiendo elementos, atri¬ 
butos v tipos. 
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Figura 19.14. Añadimos un nuevo esquema XML 


Utilizando este diseñador seria fácil definir los elementos de cada uno de 
los tipos que contendrá un documento, en nuestro caso esos tipos serian Sof t- 
ware y Libros que, a su vez, contendrían otros tipos. Si ya tenemos un docu¬ 
mento XMI. creado, podemos generar automáticamente el esquema XSD usando 
la opcion XML>Crear esquema Generado el esquema, ése se asociará con el 
documento XMI y podremos utilizar la opción XML>Validar datos XML para 
comprobar su validez Al ir introduciendo datos, además, los posibles errores 
se indicaran como es habitual en el editor de codigo de Visual Basic, con un 
subrayado de color. 


Codificación manual del esquema 

Aunque tan sólo se han descrito los conceptos mínimos de XSD, tenemos 
suficiente información para crear un esquema que describa la estructura de 
nuestros documentos XML, concretamente el ultimo usado como ejemplo com¬ 
puesto de una lista de productos, sin necesidad de recurrir al diseñador que 
incorpora Visual Basic NET. El esquema sería el siguiente: 

<xs : schema xmlns:xs“”http: //www .w 3 .org/2 001 /XHLSchema " > 

<xs:element name="ListaProductoa M lype="ListaProdactosType "/> 

<xs : complexType natne=" ListaProductosType"> 

<xs:sequence> 

<xs:element narae*"Software" type» M SoftwareType"/> 




<xs:element ñame*"Libros " type- " LibrosType "/> 

</xs:sequence > 

</xs:complexType > 

<xs:coraplexType name=" Sof twareType "> 

<xs:sequence > 

<xs:element name = " Producto" Lype="xs : sí.ring" 
minOccui s a * 0 " rnaxOccurs = "unbounded" /> 

</xs:sequence > 

</x s:comp1e xType > 

<xs:complexType ñame»"LibrosType "> 

<x s:sequence> 

<xs:element ñame»"Libro" type="LibroType" 
minOccurs*"0" maxOccurs*"unbounded"/> 

</xs:sequence > 

</xs:complexType > 

<xs : complexType ñame-''ProductoType"> 

< x s:sequence> 

<xs:element ñame* " Nombre " type»"xs : string "/> 

< xs : element ñame*"Descripción" type» M xs :siríng“/> 

<xs:element name ="Fabricante" type»"xs : string"/> 

<xs : element name^Distr ibuidoi es " type*" DistribuidoresType" /> 

</xs:sequence> 

< xs: attribute ñame» "Tipo" type»'*xs :st ring” /> 

</xs:complexType > 

<xs:complexType ñame*"LibroType "> 

< xs:sequence> 

<xs:element name*"Titulo" type» " xs : string "/> 

<xs:element ñame*" Aut or" type» M xs : string" /> 

<xs:element ñame» "Edi toria 1" type="x8 : string" /> 

</xs:sequence> 

< xs :attribute name»“Categoria" type- " xs :st r i ng "/> 

</xs:complexType > 

<xs:complexType ñame» M Distribu i doresType "> 

<xs : sequence:» 

<xs:element name="Distribuidoi w type= " xs : string" 
minOccurs-"I" maxOccurs 3 "unbounded”/> 

</xs:sequence > 

</xs:complexType > 

</xs:schema> 

En este esquema se indica que nuestro documento tendrá un elemento lla¬ 
mado ListaProductos que será de tipo ListaProductosType. En dicho 
tipo se especifica que el elemento contará con dos subelementos: Software v 
Libros, que deberán aparecer en ese orden. C ontinuando con el análisis llega¬ 
remos hasta los tipos mas sencillos, los elementos y atributos que contienen un 
dato simple como string. 

introducción a XSLT y XPath 

Aunque no son dos temas que nos interesen demasiado en este momento, lo 
cierto es que (ras haber conocido los fundamentos de XSL no es difícil com¬ 
prender que son v para qué se utilizan XSLT (XSL 1 'ransfbrrmtfitws) v XPath. Po¬ 
dríamos decir que ambos son un subconjunto de XSL, o bien que son lenguajes 



derivados de XSL. Ambos, XSI I 1.0 \ XPath 1.0, son actualmente trabajos en 
proceso en el VV3C’. 



Figura 19.15. Aspecto del diseñador de esquemas durante la creación 
del esquema para nuestro documento 


XPath es un lenguaje de selección de datos contenidos en documentos XMl 
Usando una analogía, podríamos decir que XPath es a un documento XMl lo 
que SQI a una base de datos. XPath, por lo tanto, es simplemente un lenguaje, 
siendo necesaria una aplicación o componente que sea capa/ de interpretarlo 
adecuadamente y ejecutarlo, lo mismo que los sistemas RDBMS interpretan y 
ejecutan las consultas expresadas en SQI . 

XSI.T es un lenguaje de transformación de datos, utilizando XPath para se¬ 
leccionar la información de un documento XML y, posteriormente, generar otro 
distinto, va sea XML, HTM1 o en otro formato. Ln realidad, XSLT es la parle de 
XSI que va conocemos, v utilizamos en un ejemplo previo, para generar un do¬ 
cumento a partir de otro distinto. 

Kn este contexto, una hoja de estilo XSI es un documento que, utilizando sin¬ 
taxis XML, combina XSLT, XPath y los objetos de formato XSL para generar 
unos documentos a partir de otros. Si tomamos la última hoja XSI, utilizada co¬ 
mo ejemplo anteriormente, los elementos que localizan la información, como 
match = M / " o select= "ListaProductos/Sof twa re/Producto" , son parte 
del lenguaje XPath, mientras que los elementos que manipulan la información 















y la convierten, como témplate y f or-each, pertenecen al lenguaje de trans¬ 
formación XSI.T. 

¿Que sentido tiene independizar aspectos que, como XPath v XSLT, forman 
parte de una especificación anterior y más amplia, como es la de XSL? La respues¬ 
ta la encontramos en el uso de esos subconjuntos en otros contextos. XPath, por 
ejemplo, es el lenguaje estándar de localización de elementos XML en estándares 
como XPoinler. 


Introducción a SOAP 


XML no tiene aplicación sólo como estándar para la creación de documen¬ 
tos intercambiables entre aplicaciones y sistemas, sino que tiene también un 
gran peso en el nuevo contexto de los servicios web. No en vano, XML es la base 
del protocolo SOAP y el lenguaje W5DI. que trataremos en el siguiente punió. 

SOAP {Simple Objci t Access Pro/oca/) es un protoado RPC {Knnotr Preccd/m* 
Cali) que utiliza XMI. como lenguaje para describir la acción v III IP como 
protocolo de transporte a través de la red. Esto hace que sea compatible con 
cualquier lenguaje y sistema operativo, va que XML es un estándar ampliamen¬ 
te aceptado. Al mismo tiempo, utilizando H I I P como protocolo de transporte 
se evitan los problemas que plantea el uso de otras técnicas, como DCOM o 
CORBA. en redes donde existen cortafuegos. 


Nota 

Realmente SOAP puede usarse con otros protocolos de transporte, como 
SMTP, no está diseñado exclusivamente para utilizarse con HTTP aunque, 
actualmente, ésta sea la opción más lógica y utilizada. 


Mediante SOAP se componen mensajes que van desde el cliente, que efec¬ 
túa una petición, al servidor, indicándole cuál es la acción o el servicio que de¬ 
sea usar y, en caso necesario, facilitándole los parámetros que lue.sen necesarios. 
Kl servidor, en respuesta, remitirá otro mensaje al cliente con los resultados. 

Estructura de un mensa je SOAP 

Los mensajes SOAP son documentos XML que se ajustan a un cierto esque¬ 
ma. Este determina que deberá existir un elemento Envelope que contenga 
todo el mensaje, conteniendo elementos opcionales, como una cabecera, v otros 
obligatorios, como Body, en el que se indk ará el servk io al que desea ar cederse 
No hay diferencia entre un mensaje de solicitud v otro de respuesta, salvo 
en que utilizan mensajes distintos de IITTP para viajar del diente al servidor o 
viceversa. Imaginando que tuviésemos en marcha un servicio de información 
bibliográfica, un cliente imaginario podría enviar este mensaje: 




<SOAP-ENV:Envelope > 

< SOAP-EWV:Body > 

<InformacionLibro • 

<ISBN>84-415-09b7-0</lSBN> 

</InformacionLibro^ 

</SOAP-ENV:Body> 

</SOAP-ENV:Envelope> 

En el servidor al que se envió osle mensaje existirá un componente que lo 
identificará, tomará el parámetro facilitado v generará una respuesta con la in¬ 
formación correspondiente. 

hl mensaje de respuesta bien podría ser el siguiente: 

<SOAP-ENV:Envelope> 

<SOAP-ENV:Body> 

< InformadonLibroRespuesta> 

<Titulo>Programación con Visual Basic .NET</Titulo> 

< / I n formad onLibroRespuesta> 

</SOAP-ENV:Body> 

</SOAP-ENV:Envelope> 

Elementos como InformacionLibro e InformacionLibroRespuesta 
oslarían definidos en algún esquema, mientras que los elementos Envelope y 
Body son parte de la especificación de SOAP. 

SOAP y Visual gasic .NET____ 

Visual Basic .NET usa SOAP para permitir la comunicación entre servicios 
Windows v las aplicaciones que consumen dichos servicios, lodo el proceso 
de generación de los mensajes, transferencia, recepción e interpretación queda 
en manos de objetos va predefinidos en la plataforma NET, de manera que no¬ 
sotros nunca tendremos la necesidad de trabajar manualmente con este tipo de 
información. 


Introducción a WSDL y UDDI 


Para poder invocar a un servicio web, componiendo adecuadamente el men¬ 
saje SOAP para efectuar la solicitud, es necesario contar con una descripción 
de ese servicio. En esa descripción se enumeran las funciones con que cuenta el 
servicio, los parámetros que necesitan, las respuestas que generan y los tipos 
de datos utilizados en todo el proceso. Las empresas ofrecerán esos servicios a 
través de Internet, y la descripción, lógicamente, estara almacenada en un ser¬ 
vidor. Es necesario, por tanto, algún mecanismo que permita localizar la des¬ 
cripción. Aquí es donde entran en escena UDD1 y WSDL. 

UDDI (Uim>crsal Discovery, Descriptiva and Integration Service) es un servicio 
de directorio puesto en marcha por empresas como Microsoft e IBM. Su finali¬ 
dad es servir, a modo de una guía telefónica, para localizar el tipo de servicio 



por el que está interesado el oliente. F.l servicio UDDI le facilitará las releren- 
üas necesarias para acceder a la descripción do esos servicios. 

I «i descripción de un servicio web se efectúa mediante VVSDl (Web Sc/pár 
Dr.srr/pfww Litn$iui t \ jr), otro lenguaje basado en XML. En un archivo VVSDl se 
combinan elementos XMI específicos para la descripción del servicie», por ejem¬ 
plo los conectares para acceder a él, y esquemas que definen los datos que se 
enviarán o devolverán las Junciones del servicio. 

El funcionamiento conjunto de UDDI, VVSDL y SOAP queda reflejado en la 
figura 1 C ).I6. l a aplicación recurre, en primera instancia, al registro UDDI para 
localizar el servicio que está buscando. De dicho registro obtiene uno o v arios 
URI , que usa para acceder a los servidores que otrecen esos sen icios en busca 
de la descripción VVSDl Disponiendo de esta, la aplicación va puede compo¬ 
ner adecuadamente los mensajes SOAP para consumir esos servicios. 

No tenemos que preocuparnos por la generación de la descripción VVSDl , 
ya que esta es una tarea que realiza automáticamente Visual Basic Al I como 
podremos experimentar en los punios siguientes. También hay herramientas 
de terceros para efectuar eso trabajo 



Figura 19.16. Esquema de funcionamiento de una aplicación que consume 
un servicio web 


Creación de un servicio Web 

Para poder hacer pruebas con un servicio Web, desdo cualquier tipo de apli¬ 
cación, primero debemos disponer del propio servicio. Por ello comenzaremos 
creando un servicio simple, dispondrá tan sólo de un método cíiva finalidad 
sera devolver una cadena de caracteres con la fecha y hora actuales. Sera sufi¬ 
ciente, no obstante, para que conozcamos la estructura básica de un servicio 
Web v podamos, posteriormente, utilizarlo como base para crear otro de mavor 
com plejjdad 

Aunque vamos a usar Visual Basic .NET para crear nuestro servicio Web. 
realmente no necesitaríamos más herramientas que el Bloc de notas para esi ri 
bír un módulo que seria compilado dinámicamente por parte de ASIVNI T 




Los servicios Web son accesibles, generalmente, a través de un servidor 
Web F.l punto de entrada es un archivo con extensión asmx. Este puede conte¬ 
ner el código del servicio o bien una referencia a un módulo que contiene dicho 
código. 

Anatomía de un servicio Web 

I a clase de la cual deben derivarse los servicios web es WebService, aloja¬ 
da en el ámbito con nombre System. Web. Services. En el interior de esta 
nueva clase, que heredará los miembros de WebService. podemos incluir to¬ 
dos los métodos que necesitemos, ya sean privados, protegidos o públicos, uti¬ 
lizando la sintaxis propia del lenguaje que estemos usando. Ninguno de esos 
métodos, sin embargo, sería accesible para un consumidor del servicio. 

Aparte de listas de parámetros, tipos de retorno y especi Picadores, un méto¬ 
do también puede contar con atributos, según vimos en un capítulo previo. Es- 
los se introducen entre los símbolos < y > en el caso de Visual Basic .NET, y se 
colocan, generalmente, delante de la cabecera del método. 

Si deseamos que una cierta clase pueda considerarse un servicio web, apar¬ 
te de derivarla de la clase WebService también deberemos definir al menos 
un método con el atributo WebMethod. De esta forma indicaríamos qué méto¬ 
dos de la clase estarán accesibles para los consumidores, simplemente disponien¬ 
do <WebMethod> delante do la cabecera de los métodos que nos interesen. 

Por ultimo, el documento asmx deberá iniciarse mediante la directiva <%£ 
WebService, indicándose el lenguaje en el que está escrito el código o, si pro¬ 
cede, facilitando el ámbito y nombre de la clase si ésta va se encuentra precom¬ 
pilada. 

El servicio horario 


Para crear nuestro servicio Web nos serviremos, una vez más, de los asis¬ 
tentes que hay en la ventana Nuevo proyecto, tal y como puede verseen la figu¬ 
ra 19.17. Esto asistente generará el archivo asmx indicando en él que el código 
del servicio Web se encuentra en el módulo asmx. vb que, como puede supo¬ 
ner, solo contiene código Visual Basic .NET. 

En principio se encontrará con un diseñador muy similar al utilizado en un 
capítulo previo para la creación de formularios Web. Pulse el enlace que le per¬ 
mite acceder al código y observe entonces la definición de la clase, derivada de 
System. Web.Services . WebService. En el constructor hay una llamada al 
método Init ia 1 i zeComponent ( ), conloen otros tipos de aplicación, si bien 
en este caso dicho método está vacío. 

Añada el código siguiente al final de la clase: 

<WebMethod()> _ 

Public Function Horas() As String 
Return DateTime .Now. ToStr ing() 

End Function 




Nuevo proyecto 


Itx* ó» prometo: 


Figura 19.17. Iniciamos el desarrollo de nuestro servicio Web 


Como puede ver, el método difícilmente podría ser mas sencillo. Recupera¬ 
mos la fecha y flora actuales, de la propiedad Now de la clase DateTime, con¬ 
vertimos el dato en una cadena v lo devolvemos. I o único especial es el atributo 
<WebMethod> delante del método. 

Solo con esto ya tiene desarrollado su primor servicio Web. no necesita ha¬ 
cer nada mas. Desde cualquier ordenador podría obtenerse la hora del servi¬ 
dor en que se ejecuta el servicio, sin necesidad de escribir ninguna aplicación v 
sin importar la plataforma. 


El módulo asmx 

í lasta ahora hemos estado trabajando con el módulo que contiene el código 
del servicio, un módulo que sera compilado desde Visual Basic Nb, I generan¬ 
do un ensamblado v que. por tanto, no habrá que compilar dinámicamente 1 . 
Aunque en el Explorador de soluciones aparece el modulo asmx. si hace doble 
clic sobre el se encontrará con el modulo de código, el modulo asmx. vb. I.slo 
es así porque el módulo asmx, que es el punto de enLrada al servicio Web, es 
mantenido internamente por Visual Basic .Nb, I . 

Rara abrir el módulo asmx tendrá que desplegar su menú emergente, pul¬ 
sando sobre dicho módulo en el Explorador de soluciones con el botón secun¬ 
dario del ratón, y después elegir la opción Abrir con. Aparecerá una ventana, 
similar a la déla figura 19.18, en la que podremos elegir el tipo de editor a uti¬ 
lizar. I ras pulsar el bolón Abrir podra, linalmenle, ver el contenido del múdu 
lo asmx. 

I I contenido inicial de este módulo es el que puede verse a conlinu.u ion 

WebService Language-" vb " 

Codebehind r "Service!.asmx.vb" 

Class - "ServicioHorario. Servicel " 1. » 

















Abrir con - ServIcioHora.asmx 


seleccione el orograma oue desee usar 


(Eddor á» provectos pr*de?*rmrado) (c*r«jetennnad 
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Figura 19.18. Seleccionamos el tipo de editor para abrir 
el modulo asmx 

Simplemente se indica el lenguaje, módulo y dase donde se encuentran los 
métodos del servicio Web. F.n la práctica, podríamos sustituir ese código por el 
siguiente v olvidarnos del módulo asmx.vb, incluyendo toda la lógica en el 
modulo asmx. La compilación, además, sería dinámica. 

WebService I,anguage="vb" 
class*"ServioioHorario.fíervicíoHorario M 

Imports System 

Imports System.Web.Services 


Public Class ServicioHora 
Inhents WebService 


<WebMethod> _ 

Public Function Horas() As String 

.»» D • i .■ •* i 

return DateTime.Now.ToString() 

End Function 
End Class 

Aunque nuestro proyecto cuenta, aparte de con los mencionados módulos 
asmx y asmx.vb, con un archivo de configuración, web.conf ig, y algunos 
elementos más, lo cierto es que un archivo con extensión asmx conteniendo el 
código anterior y colocado en la carpeta raíz del servidor sería suficiente para 
disponer de un servicio web. 

Módulo de descripción del servicio 

Si quisiéramos registrar nuestro servicio Web en un directorio, a íin de que 
cualquiera pudiera hacer uso de el. necesitaríamos un módulo de descripción. 
!\n el se encontraría información sobre cómo acceder al servicio v a sus méto¬ 
dos. C onociendo la sintaxis de WSDI , que es el lenguaje en el que debe facilitarse 









osla descripción, podríamos crearla a mano. No obstante, ASP.NI I es capa/ 
do generar automáticamente la descripción de cualquier servicio Web que ha 
vamos creado con Visual Basic .NE I 

Asumiendo que tenemos abierto el servicio horario que acabamos de desarro 
llar, bastará con ejecutarlo para acceder a una página como la de la figura 19.1^ 
Desde ella podemos tanto ejecutar el servicio como acceder a su descripción 
pulsando el enlace descripción de servicios. E\ resultado será un documento 
XMI (véase figura 19.20). 



Figura 19.19. Página obtenida al ejecutar el proyecto 

l al como se aprecia en el código siguiente, la descripción VV5DI de nuestro 
servicio si* compone, claramente, de varias secciones distintas. 

<?xml versión = M 1 . 0" encodinq e M vit f-8 ’* ?> 

<definitions 

xinl iís : s= “ http : / / www .w3.org/2001/ XMLSchema “ 

xinj ns : http* "http : / /schemas . xmlsoap . org/wsdl / http/ “ 

xmlns:mirae*"http://schemas .xmlsoap.org/wsdl/mime/" 

xmlns:tro* 

"bttp://microsoft.cora/wsdi/rairae/textMatching/" 
xrolna:soap=http://schemas.xmlsoap-org/wsdl/soap/" 

xm l lis : soapenc T 

”http://schemas.xmlsoap.org/soap/encoding/" 
xral ns : sO ,r "http: / / www . fcharte. com" 







targetNamespace*"http: / /www. fcharte. con" 
xmlns®" http :/ /schemas . xrolsoap .org/wsdl / " > 

< t ypes - * 

<s : achema a t tributeFormDef aul t- " qualif ied " 
e lemen l..FormDef aul t*" qualif ied " 
tarqetÑamespace=" http : //www.fcharte.con "> 
<B:element ñame "Horas "> 

<s:complexType /> 

< /s :element > 

< a : e lemen t. ñame'" Horas Res pon se" > 

*■- s: complexType > 

<s:sequence> 

<s:e]ement minOccurs="1 M maxOccurs="1” 
ñame® M HorasResult” nillable="true" 
type="s:string H /> 

</s:sequence> 

</s: complexType » 

</a:e1ement> 

<s:elemenL name= " st r ing" nillable» ** true ” 
type®"s: string" /> 

</s:schema> 

</Lypes> 

<messaqe ñame® " HorasSoapIn " > 

<part name=" parameters " e1ement= " sO:Horas" /> 

</message> 

<messaqe name= ” HorasSoapOut " > 

<part ñame®" parameter* " 

element*" sO : HorasResponse * /> 

</message> 

<messaqe ñame»" HorailttpGetIn" /> 

<message ñame®" HorasHttpGetOut "> 

<part name®"Body" element*" sO : string” /> 

</message> 

<message name=" HorasHttpPostIn" /> 

< messaqe ñame®" HorasHttpPostOut "> 

<part name="Body“ element* M sO:st ring " /> 

</message > 

<port.Type ñame® " Service 1 So a p" > 

<operation ñame®" Horas "> 

<input messaqe-“ sO : HorasSoapIn" /> 

<ouLput. message-’ sOrHorasSoapOut" /> 

</operal. ion> 

</poitType> 

<portType name=’* ServicelHttpGet M > 

<operation name=" Horas "> 

<input message®" sO : HorasHttpGetIn" /> 

<output message®" sO : HorasHttpGetOut " /> 
</operation> 

</portType> 

<por i.Type ñame®" ServicelHt tpPost "> 

<operation ñame®" Horas "> 

<input message®" sO : HorasHttpPostIn" /> 

<ot.i tput message®" sO : HorasHttpPostOut " /> 

</opera tion> 

</poitType> 

«'binding ñame® " ServicelSoap" type® “sO : ServicelSoap" > 
<soap:binding 

transport="http: //schemas. xmlsoap.org/soap/http" 



sty le = “document " /> 

<operaLion name=" Horas"> 

<soap:operation 

soapAction=”http://www.fcharte.cora/Horas” 
style a "docuraent* /> 

<input> 

<soap:body use= M 1iteral" /> 

<I input> 

<output> 

<soap:body use»"literal" /> 

</output> 

</operation> 

</blnding> 

<binding name*"ServicelHttpGet" 

type a ”sO:ServicelHttpGet"> 

<http:binding verb=”GET" /> 

<operation ñame®"Horas”> 

<http:operation location*"/Horas" /> 

<input> 

<http:urlEncoded /> 

</ input> 

<'output > 

<mime:mimeXml part**Body" /> 

</output> 

</operation> 

</binding> 

<binding name="ServicelHttpPost" 

type®”sO:ServicelHttpPost”> 

<http:binding verb- M POST“ /> 

<operation ñame® '* Horas" > 

<http:operation location*"/Horas" /> 

<inpu t> 

<mimercontent 

type="application/x-www-form-urlencoded M /> 

</input> 

<output > 

<nii me : mimeXmi part=“Body" /> 

</ou Lput> 

</operation> 

</binding> 

<service name ="Servicel"> 

<port ñame-"ServiceISoap" 

binding*"sO:ServicelSoap”> 

<8oap:address 

location*"http://localhost/ ServicioHora.asmx" /> 

</port> 

<port ñame*"ServicelHttpGet” 

binding*"sO:ServicelHttpGet”> 

<http:address 

location®"http://localhost/ ServicioHora.asmx" /> 

</port> 

<poit name*"ServicelHttpPost" 

binding="sO:ServicelHttpPost"> 

<http:address 

location="http://localhost/ ServicioHora.asmx /> 

</ port> 

</service> 

</definitions> 
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Figura 19.20. Descripción WSDL tal y como aparece en Internet Explorer 

Todo el documento se encuentra contenido en un árbol cuyo elemento raíz 
es la etiqueta <def initions>. en cuvo interior podemos distinguir varias 
partes. En la primera se definen los tipos de datos utilizados en el servicio, en 
este caso HorasResponse que se define como una cadena de caracteres que 
puede ser nula. 

A continuación encontramos la enumeración de los mensajes que pueden 
enviarse al servicio v los puertos de comunicación. Estos describen el enlace 
necesario para poder utilizar el servicio mediante SOAP, una solicitud GET de 
http o un POST de ese mismo protocolo. Finalmente, encontramos una descrip¬ 
ción del servicio v las direcciones v puertos de acceso. 





Consumo de un servicio Web 


Ya leñemos un servicio web creado v, tras compilarlo, insidiado en nuestro 
sistema, pero no sabremos si realmente funciona o no hasta que lo consúma¬ 
nlos. Tal v como se ha visto en la descripción WSDI . podríamos utilizar con tal 
l'm el protocolo II I' I P, bien a través del método GET o con POST, o el protocolo 
SO Al*. 

Si pretendemos acceder al servidor desde un cliente Web, como es Internet 
Fxplorer, lo normal es que nos sirvamos de I i I I P Realmente no necesitamos 
diseñar una página ni nada parecido, puesto que basta con introducir la solici¬ 
tud indicada en la propia descripción WSDI. Inténtelo con el siguiente l KI 
http://localhost/ServicioHorario/ServicioHorario.asmx/Horas, 
asumiendo que ha utilizado los mismos nombres del ejemplo desarrollado pre¬ 
viamente Debe aparecer una respuesta como la de la figura PT2I. lis un docu 
monto XMI conteniendo el resultado de la ejecución del servicio. 



Figura 19.21. Consumimos el servicio introduciendo una solicitud HTTP 

I latiendo en el URI. referencia directa al servicio Web, sin indicar nombre 
de método alguno, conseguiremos que ASP.NF I obtenga de la WSDI toda la in¬ 
formación necesaria para crear una pagina dinámica en la que se indiquen to¬ 
dos los métodos que existen, los parámetros que loman, sus valores de retomo, 
etc. bu esa pagina, además, existirán los controles necesarios para que poda 
mos facilitar parámetros y efectuar llamadas. Fs una forma rápida de compro¬ 
bar el funcionamiento de un servicio. 

Introduzca el URL http: //localhost/ServicioHorario/Servicio- 
Horar io.asmx y observo lo que ocurre Fn el documente» devuelto haga clic 
sobre el enlace Horas para acceder a la página, similar a la de la figura 1^.22, en 




la que puede ver toda la información existente sobre el método. Como se vio 
antes, también puede abrir la descripción WSDL usando el enlace apropiado. 
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Figura 19.22. Página generada dinámicamente por ASP NET para comprobar 
el funcionamiento de un servicio Web 


Aunque es éste* un método cómodo y rápido para comprobar el funcionamien¬ 
to de los servicios Web, desde luego no será el preferido para que los clientes 
lo utilicen. Lo habitual será crear una aplicación que, sirviendo de interfaz pa¬ 
ra el usuario final, sea la que consuma el servicio. En los puntos siguientes, por 
tanto, lo que haremos será actuar como consumidores de ese servicio desarro¬ 
llando aplicaciones para el usuario. 





deferencias externas 

LJn servicio Web puedo ser consumido desde cualquier tipo do aplicación, 
va se ejecute en Windows nativamente, sea una aplicación Web o utilice otro 
sistema operativo, sin importar el lenguaje que se haya utilizado Para poder 
consumir el servicio que acabamos de escribir, asumiendo que la aplicación 
consumidora estará en cualquier punto v no precisamente en el ordenador don 
de se ejecuta el servicio, necesitaremos lo que se conoce habilualmentc como 
un pro.vi/. 

I I previ/ no es mas que un modulo de código que, usado en el cliente o con 
sumidor. hace aparecer como local un servicio que se ejecuta remotamente, de 
tal forma que su consumo resulta igual desimple que si utilizásemos un rompo 
nenie cualquiera. Para generar este pre vi/ tan sólo tenemos que usar una opi ion 
de Visual Basic NI I. 

Asumiendo que hemos iniciado un nuevo provecto, por ejemplo una aplica¬ 
ción Windows desde la que pretendemos consumir el servicio, utilizaremos el 
menú emergente de la carpeta Referencias, en el Explorador de soluciones pa¬ 
ra añadir una nueva referencia Web, como se ha hecho en la figura 19.23. I sla 
opción también esta disponible para cualquier otro tipo de provecto, no es ex 
elusiva de las aplicaciones basadas en formularios Windows. 



Figura 19.23. Añadimos al proyecto una referencia externa 


De inmediato nos enconltaremos con la ventana mostrada en la figura 19.24 
I n ella tenemos distintas opciones para localizar el servicio Web que deseamos 
consumir: usar uno de los registros UDD1 de Microsoft, buscar sen icios loca 
les o, finalmente, introducir en la parte superior el tJKl del servicio. 

I n nuestro caso, suponiendo que estamos desarrollando la aplicación en el 
mismo ordenador donde se encuentra el servicio, pulsaríamos el ultimo enlace 
de la ventana o, alternativamente, introduciríamos el URI en la barra Direc¬ 
ción. Veríamos aparecer la pagina en la que se describe el servicio, desde la 
cual podemos acceder también al modulo WSDl terminaríamos pulsando el 




botón Agregar referencia que hay en la parte inferior (véase figura 19.2?) para 
importar la referencia en nuestro proyecto. En ese momento Visual Basic NE I 
se encargara de crear el previ/ para poder consumir ese servicio. 



Figura 19.24. Tenemos diferentes opciones para localizar el servicio 



Figura 19.25. Obtenemos una referencia al servicio Web 









Importada la referencia verá como se añade al Explorador de soluciones un 
elemento llamado localhost que contiene varios módulos, entre ellos la descrip¬ 
ción WSDL del servicio Web. 

¿Dónde esta el proxy? 

Además de los tres módulos que inicialmente podemos ver en la carpeta 
localhost, el proceso de importación de la referencia al servicio Web ha genera¬ 
do otro que no aparece en el Explorador de soluciones. Puede verlo accediendo, 
por ejemplo desde el Explorador de archivos de Windows, a la carpeta Refe¬ 
rencias web\loca 1 host del proyecto. Ese modulo adicional, llamado en 
este caso ServicioHorar io. vb, es el que contiene el código del ftrox\r pro¬ 
piamente dicho. 

St abre este archivo encontrará un código similar al siguiente: 

Importa System 

Importa System.Diagnostics 

Imports System.Web.Services 

Imports System.Web.Services.Protocols 

Imports System.Xml.Serialization 

Namespace locaLhost 

< WebServiceBindingAttribute{ 

Ñame: = "ServicioHoraSoap'‘ r Namespace | : = 

"http://www.feharte.com M )> 

Public Class ServidoHorario 
Inherits SoapHttpClíentProtocol 

< DebuggerStepThroughAttribute()> 

Public Sub New( > 

MyBase.New 

Me.Url ” _ 

M ht tp://localhost/ServidoHorario/ServicioHorario.asmx" 

End Sub 

< DebuggerStepThroughAtt ribute ( ] , 

SoapDocumen tMethodAt t r i bu te ( 

"http://www.feharte.coro/Horas", 

RequestÑamespace:="http: //www .feharte.cora", 

ResponseNamespace:=”http://www.feharte.cora", 

Use: = Descr iption.ScapBindingUse.T.i tera l , 

ParameterStyie:* SoapParameterSty1e.Wrapped)> _ 

Public Function Horas(| As String 
Dim results() As Object - _ 

Me.Invoke("Horas", New Object(-I) {>) 

Return CType{resu1ts(0),String) 

End Function 

< DebuggerStepThrouqhAttribute()> 

Public Function BeginHoras( 

ByVal callback As System. AsyrieCa I I back , 

ByVal asyncState As Object) As IAsyncResulI 
Return Me.BeginInvoke( M Horas M , 

New Object (-1) <), callback, asyncState) 



End Function 

< DebuggerStepThroughAttabute( }> 

Public Function EndHoras( 

ByVal asyncResulI As TAsyncReau 11.) As String 
Dim results( ) As Object * 

Me.EndInvoke{asyncResult ) 

Return CType (resulta(0).String ) 

End Function 
End Class 

End Namespace 

Observe que la dase generada en el pro.x 1 / está derivada de la dase Soap- 
H ttpClient Pro toco 1 . utilizando el protocolo SOAP para comunicarse con 
el servidor que ofrece el servicio. 

Asumiendo que podemos obtener la descripción WSDL de cualquier serví 
ció desde un directorio universal, como el perseguido por UDDI. estaríamos 
en disposición de poder consumirlo directamente generando este prox y y dan¬ 
do los pasos que se describirán en el punto siguiente. 

La clase cuenta con un método, Horas ( ), que os el encargado de llamar al 
método homónimo del servicio remoto 


Uso de I servicio Web desde el consumidor 


Para poder acceder al servicio Web desde nuestro programa tendremos, por 
tanto, que 1 rear un objeto de la clase generada en el pro\\f, en este caso Servi- 
cioHorario. 

Dicha clase se encuentra en el ámbito con nombre Consumidor. localhost, 
mientras que ('I formulario de nuestra aplicación esta en el ámbito Consumi¬ 
dor Eso significa que tenemos las dos opciones siguientes: importare! ámbito 
Consumidor. localhost i» utilizar una referencia tipo localhost.Servi- 
cioHora. 

Insertamos en el formulario Windows, que actualmente está vacío, un con¬ 
trol Label y un botón. I lacemos doble clic sobre éste e introducimos el código 
siguiente: 

Dim MiServicio As loca 1 host.ServicioHorar io - 
New localhost.ServicioHorario () 

Labell.Text = MiServicio.Horas() 

Es todo lo que necesitamos. Cada vez que se pulse el botón se solicitará la 
hora al servicio Web y se mostrará en la etiqueta de texto. En este caso tenemos 
el servicio y el consumidor en el mismo ordenador pero, en la practica, el serv 1 - 
cio podría encontrarse en cualquier servidor del mundo. En la figura 1^.26 pue¬ 
de ver el programa en funcionamiento. 

Podemos hacer el servicio Web mucho más complejo, añadiendo nuevos 
métodos, v el cliente en lugar de lina aplicación Windows puede ser una apli¬ 
cación Web tipo ASP.NET. un componente u otro servicio. El esquema de de¬ 
sarrollo, no obstante, siempre será el descrito en los puntos previos 





Figura 19.26. El consumidor en funcionamiento 


Puntos clave 


• Un servicio Web es un componente que se ejecuta en un servidor v al que 
es posible acceder desde cualquier cliente, sin importar el sistema opera¬ 
tivo, hardware o lenguaje utilizado para desarrollarlo. 

• Partiendo del estándar XML, se han desarrollado diversos protocolos \ 
lenguajes a propósito para facilitar el desarrollo v la comunicación entre 
servicios Web. 

• Mediante el lenguaje WSDI se describe la estructura de un ser\ icio Web: 
funciones que pone a disposición del cliente, canales para comunicarse 
con él. 

• UDDI es un servicio de directorio que tiene por objetivo simplificar la 
publicación v localización do servicios Web. 

• Para comunicar a los consumidores con un servicio se utiliza generalmen¬ 
te el protocolo SOAP, definido como un protocolo de llamadas remotas 
que usa M I I P como transporte. 

• I n torno a XML han surgido muchos otros estándares del W3C, como 
XSL, XSD, XSL1 v XPath que tienen utilidad no sólo en el campo de los 
servicios Web. sino también en otros iuu\ distintos como la gestión de ba¬ 
ses de datos. 

• Visual Basic NLT dispone de editores y diseñadores que reconocen la 
sintaxis de XM1 y XSD, haciendo más fácil la creación de esquemas \ edi¬ 
ción de datos contenidos en documentos XML. 

• (.radas al asistente de creación de servicios W eb de Visual Basic N I T, el 
único trabajo manual del que tenemos que hacernos cargo es la definición 
de las funciones del servicio, marcándolas como accesibles desde el exte¬ 
rior mediante el atributo <WebMethod>. 




• I I punto de entrada a un servicio Web es un módulo asmx que sera pro¬ 
cesado por el servidor, de igual forma que el punto do entrada de una apli¬ 
cación Web es un módulo aspx. 

• ASP.NET se encarga de generar automáticamente el modulo WSDI. de 
descripción del servicio a partir del código Visual Basic .NI' I que lo com¬ 
pone. 

• Simplemente importando una referencia a un servicio web. utilizando la 
correspondiente opción del Explorador de soluciones. Visual Basic .NET 
genera automáticamente el previ/ necesario para poder utilizarlo. 


Re&umen 


Como ha podido ver en este capitulo, la Web puede utilizarse para algo más 
que la publicación de documentos más o menos dinámicos. Gracias a recursos 
como SOAl\ XML, HTTP v WSDI. es posible el ofrecimiento de servicios univer¬ 
sales, que pueden ser consumidos independientemente de plataformas hardware 
y software, de sistemas operativos v lenguajes de programación. 

1 lemos desarrollado un servicio Web simple y visto los pasos que hemos de 
llar para consumirlo desde una aplicación basada en formularios Windows, ge¬ 
nerando por el camino un pro.u/ que, desde Visual Basic .NF.T, queda oculto. El 
motor que hay detrás de los servicios Web, en el caso de la plataforma ,NE I, es 
ASP.NET 
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Fundamentos 

i 

de tratamiento 
de datoe 

Como apuntábamos en el capitulo dedicado a los servicios de entrada v sa¬ 
lida, la mayoría de las aplicaciones actuales. Independientemente de su finali¬ 
dad, siempre tienen una necesidad: almacenar información para posteriormente 
poder recuperarla, tratarla, modificarla y, en general, manipularla según las 
necesidades y objetivos que se persigan. 

tn el capitulo siguiente veremos que Visual Basic .NLT, y su entorno, apor¬ 
tan todos los elementos necesarios para tratar bases de datos, ya sean estas lo¬ 
cales, por ejemplo una base de datos de Microsoft Access, o estén alojadas en 
un servidor, caso en el que existirá un gestor de bases de datos tipo Microsoft 
SQL Server. 

Antes de conocer la forma de tratar bases de datos con Visual Basic, sin em¬ 
bargo, tendremos que adquirir unos conocimientos mínimos: qué es una base 
de datos, tina tabla, una columna o una fila, cómo se crea una base de datos con 
SQL Server, qué es SQL y para qué sirve serán algunos de los temas que trate¬ 
mos en este capitulo. Si está acostumbrado a tratar con bases de datos posible¬ 
mente no necesite leer este capítulo, pero nunca está de mas recordar conceptos. 

Dado que Visual Studio NLT incorpora la edición de escritorio de SQL Ser 
ver 2000, y que es fácil conseguir una versión de prueba de este producto en su 
edición completa, tanto en este capitulo como en el siguiente asumiremos que 










vamos a trabajar con él. l a mavoria de los conceptos son generales a todas las 
bases de datos v sistemas KDBY1S, poro las opciones v características concretas 
de SQL Server 2000 son, lógicamente, distintas a las de Access. LoxPro u otro 
servidor de datos. 


¿Qué es una b ase de datos? 

Su propio nombre sugiere que tina base de dalos es un lugar en el que es po¬ 
sible alojar información, una especie de bolsa o cajón donde podemos deposi¬ 
tar datos diversos. Lo cierto es que una base de dalos puede contener mucho 
más que datos, configurándose en realidad en un objeto vital para la correcta 
gestión de la información que precisan las empresas. 

Una base de datos es el objeto lógico que sirve para el almacenamiento v re¬ 
cuperación de los datos desde un dispositivo, generalmente una unidad de dis¬ 
co, pero también debe asegurar la integridad de esos datos basándose en reglas 
previamente definidas. La base de datos debe autodcscribirse, de tal forma que 
la información que contiene pueda ser correctamente interpretada. 

Al trabajar con una base de datos es fundamental el rendimiento a la hora de 
reí tiperar datos, por ejemplo el resultado de la ejecución de una consulta. L no 
de los mecanismos para acelerar estas acciones es el uso de indices, otra enti 
dad que también estaría contenida en el interior de la base de datos. Asimismo, 
en la base de datos pueden existir vistas prefabricadas de la información. 

La propia lógica de funcionamiento puede estar almacenada en la base de 
datos, de manera que las operaciones mas usuales se definen como procedí mion 
tos almacenados que, posteriormente, pueden ejecutarse cuando sea necesario 
Acciones como la creación de una nueva cuenta de cliente, la totalización de un 
pedido o la búsqueda de los productos pertenecientes a una cierta familia pue¬ 
den codi tirarse como procedimientos almacenados De esta forma la base de 
datos no solo contiene los dalos, sino también los procesos necesarios para ma¬ 
nipularlos. 

Ln el caso particular de las bases de datos de SQL Server 2000, estas tam¬ 
bién almacenan funciones de usuario y permisos que limitan o describen los 
privilegios que tienen los usuarios sobre la información. 


¿Qué e s un KDBM5? 

I as aplicaciones actuales nunca manipulan directamente la información 
contenida en una base de datos, sino que usan un intermediario, conocido co¬ 
mo RDBMS (Rclatioiial Databa*? Mana$?m?nl Si/s/cw), al que envían instruccio¬ 
nes sobre lo que debe hacer. LI RDBMS traduce esas instrucciones en acciones 
concretas: creación de una tabla, extracción de todas las lilas que cumplan un 
cierto criterio, eliminación de un dalo y los relacionados, etc. también >e co¬ 
noce a los RDBMS como servidor?* ti? dato*. 



SQL Server 2000 es un RDBMS, mientras que los archivos que manipula son 
las bases de datos, de manera análoga a como IIS (Intirnct Information S nvrr) es 
un servidor web v las paginas AST.NLT son los dalos sobre los que trabaja. La 
existencia de un RDBMS permite centralizar no sólo la información, sino tam¬ 
bién la lógica necesaria para mantener su coherencia. 

Cuando las necesidades de una aplicación, en cuanto a almacenamiento v 
gestión de datos, son muy simples, puede recurrir.se a una base de datos local 
o do escritorio, como las de Access, en lugar de recurrir a un RDBMS 


Estructura física de una base de datos 


Desde el punto de vista físico, una base de datos esta compuesta de uno o 
varios archivosen disco, en ('I caso de SQI Server 2000 son dos como mínimo. 
Aunque es posible usar directamente espacio de disco sin partieionar ni for¬ 
matear para almacenar bases de datos, lo usual es usar una partición va exis¬ 
tente, con formato HAT, FAT32 o NTFS, para almacenar los archivos di* la base 
de datos. 

Como se ha dicho, los archivos necesarios son al menos dos si usamos SQI 
Server: un archivo principal con datos y un archivo de registro de transaccio¬ 
nes . De manera adicional pueden utilizarse archivos de datos secundarios, por 
ejemplo si se preve que la base de datos va a tener un tamaño considerable 
I amblen es útil el uso de varios archivos cuando éstos se alojan en varias uni¬ 
dades de discos distintas, ya que potencialmente el rendimiento es superior al 
trabajar dichas unidades en paralelo. 

Los archivos de datos, tanto el principal como los secundarios, contendrán 
los datos propiamente dichos, asi como el resto de información descrita en el 
punto anterior: índices, procedimientos almacenados, vistas, etc 

Id archivo de registro de transacciones, por su parte, se utiliza para conser¬ 
var la base de datos en un estado íntegro, facilitando su recuperación en caso 
de que liiese necesaria. Rara ello en el se almacena un registro de todos los cam¬ 
bios llevados a cabo sobre la base de datos. F.n caso necesario también es posi¬ 
ble contar con varios archivos de registro 


Nombres de archivo 


Los nombres de las bases de datos se torman, generalmente, a partir de una 
raíz facilitada por el operador que la crea y unas terminaciones y extensiones 
tijas Dicho operador, no obstante, puede establecer el nombre que pretiera, se¬ 
leccionando asimismo el destino en el que se alojaran los archivos. Suponiendo 
que estuviésemos creando una base de datos llamada Librería, los nombres 
típicos para el archivo principal de datos y para el archivo de registro serían 
Librería Data . MDF y Librería_Log . LDF, respectivamente. 

hn caso de que vayan a existir múltiples archivos, ya sean de datos o de re¬ 
gistro, los nombres de los archivos secundarios también pueden ser establecidos 



por el creador, siendo la extensión habitual NDF. Cada uno de estos archivos, 
como se ha dicho antes, podría alojarse en una carpeta e incluso unidad distin¬ 
tas. Es buena idea, por ejemplo, mantener los archivos de datos en una unidad 
distinta a la que contiene los archivos de registro de transacciones Aparte de 
mejorar el rendimiento, el fallo de una unidad no conllevará la pérdida de am¬ 
bos elementos. 

La figura 20.1 es una representación gráfica de la estructura física que ten¬ 
dría una base de datos con un archivo principal de datos y un archivo de regis¬ 
tro de transacciones. Desde el punió de vista lógico, el que veríamos desde e] 
Administrador corporativo de SQL Server, el entorno de Visual Basic NFT o una 
aplicación, la base de datos seria una entidad muy distinta a dos simples archi¬ 
vos en disco. 



Figura 20.1. Una base de datos lógica contenida en dos archivos físicos 
en disco 


Estructura lógica de una base de datos 

Para poder usar una base de datos no es necesario conocer con detalle su es 
tructura física, de igual forma que para conducir un automóvil tampoco nece 
sitamos saber cómo funciona el motor Sí precisaremos, por el contrario, conocei 
la lógica del propio automóvil: pedales, cambio de velocidad, volante, etc. D< 
forma análoga, para trabajar con una base de datos lo que sí debemos conocer e: 
su estructura lógica, ya que será esta la que debamos utilizar continuamente. 

En ese archivo principal de datos que mencionábamos en el punto anterior 
Librerí a_Data. MDF por poner un ejemplo, pueden existir tablas de datos 
vistas de esas tablas, indices que aceleren el trabajo con ellas, procedimiento: 
almacenados con la lógica para operar sobre ellas, etc. Puede utilizar el Admi 
nistrador corporativo de SQL Server v seleccionar una base de datos de las faci 
litadas como ejemplo, pubs es una de ellas, para ver cuál es su contenido. 



F.n los apartados siguientes se introducen, de manera breve, algunos de los 
elementos que podemos encontrar en una base* de datos con el fin de que al 
mencionarlos sepamos de que oslamos hablando. En la figura 20.2 puede ver 
una imagen del Administrador corporativo mostrando las categorías de elemen¬ 
tos existentes en la base de datos pubs 
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Figura 20.2. Desde el Administrador corporativo podemos ver los elementos 
de una base de datos 


Tablas 

Con este nombre es conocida la entidad básica de almacenamiento de infor¬ 
mación en una base do datos, l odos los datos que podamos añadir, ya sea me¬ 
diante una herramienta estándar o bien a través de una aplicación a medida, se 
almacenarán en tablas. Al efectuar una consulta o al abrir una vista, los datos 
se recuperan asimismo de una o más tablas. 

Una tabla está compuesta de varias filas de datos, también conocidos como 
registros, cada una de las cuales cuenta con el mismo conjunto de columnas o 
campos. Cada una de estas columnas tiene un nombre v un tipo que identifica 
la clase de información que puede contener. Las columnas se disponen hori/on- 
talmenle, de izquierda a derecha, mientras que las filas k> hacen verticalmente, 
de arriba a abajo, dando lugar a la tabla de datos. 

Generalmente una base de datos contiene múltiples tablas, existiendo enla¬ 
ces entre ellas que permiten establecer relaciones uno a uno, uno a muchos, eti. 
Un ejemplo simple sería una base de datos con información de facturación. F.n 
una tabla tendríamos el encabezado de cada pedido existente, mientras que 





otra almacenaría las lineas de cada pedido* En este caso concreto, el enlace en¬ 
tre ambas tablas permitiría crear una relación uno a muchos, obteniendo a par¬ 
tir de la cabecera de un pedido todas las tilas que forman parte de él. 

/ 

Indices 

Al trabajar con tablas de tamaño considerable, con muchos miles o, incluso, 
millones de filas, el proceso de recuperación de datos puede verse afectado de 
manera considerable. Fs lógico si tenemos en cuenta que para, por ejemplo, en¬ 
contrar todas las filas de un pedido, seria preciso recorrer la tabla de lineas de 
pedido completa, de principio a fin. 

Un mecanismo común para acelerar esa operación son los índices. Un índi¬ 
ce es una lista de claves con una estructura lal que el servidor puede realizar 
búsquedas de forma muv rápida en ella, l as claves pueden estar formadas por 
el contenido de una o varias columnas de una tabla. Los índices se almacenan, 
al igual que las tablas, en los archivos de datos mencionados anteriormente. 

Además de acelerar la búsqueda de información, un índice también puede 
ser usado para establecer el orden en que se almacenarán las filas en una tabla. 

Cada vez que se inserta, modifica o elimina una tabla de la cual depende uno 
o varios índices, el servidor tiene que actualizar no sólo la tabla de datos sino 
también todos los índices que existan a fin de que sean consistentes con la in¬ 
formación actual. 

F.s fácil deducir que cuantos más índices existan más tiempo será necesario 
para efectuar cualquiera de esas operaciones. 


Vistas 

Al trabajar con una base de datos es habitual que, de forma reiterada, se so¬ 
liciten mas o menos los mismos conjuntos de datos, para lo que se compondrán 
sentencias de consulta SQL prácticamente idénticas. Con el fin de evitar este 
trabajo repetitivo si* idearon las vistas, que podríamos definir como consultas 
ya almacenadas en la base* de datos. 

Una vista puede ser abierta y tratada como si fuese una tabla pero, en reali¬ 
dad, no contiene datos sino que los extrae de una o más tablas a partir de una 
sentencia de consulta previamente definida. Fs posible incluso utilizar la vista 
para actualizar la información devuelta, aunque con algunas limitaciones 

Mediante las vistas es posible automatizar tareas como la creación de enlaces 
entre tablas para obtener datos de varias de ellas. Una vista podría, por ejem¬ 
plo, facilitarnos todos los datos de un pedido conjuntamente con sus lineas fa¬ 
cilitando tan solo el código de ese pedido. 

Procedimientos almacenados 

F.l servidor SQL Server no sólo es capaz, de manipular información, gestio¬ 
nando tablas e índices, procesando consultas, etc., sino que, ademas, también 



cvs capaz de ejecutar procedimientos escritos en un lenguaje llamado I ransact- 
SQLen el casode SQI Server. Estos procedimientos se* denominan procedimien¬ 
tos almacenados, dado que están almacenados en la propia base de datos. 

Gracias a los procedimientos almacenados, un administrador puede crear 
no sólo la estructura de las bases de datos ion que trabajarán las aplicaciones, 
sino que también puede iniplementar la lógica para la manipulación de dichos 
datos. 

C'ontinuando con el ejemplo que va lia sido citado en puntos anteriores, al 
crear una base de datos para almacenar información sobre pedidos, con tablas 
de pedidos, lineas, clientes, etc . también podríamos definir un procedimiento 
almacenado que se encargase de crear un nuevo pedido, de devolver el total 
de un pedido, etc. 

Los procedimientos almacenados se ejecutan mucho más rápido que las 
sentencias SQI que puedan enviarse desde una aplicación, dado que se almace¬ 
nan en la base de dalos va compilados. De esta íorma, SQI Server no tiene más 
que ejecutar el codigo, sin necesidad de efectuar un análisis sintáctico \ una 
compilación previa. 


Nota 

Existen procedimientos almacenados que. en lugar de ejecutarse al ser in¬ 
vocados de manera explícita, se ejecutan automáticamente en el momento 
en que se desencadena un cierto suceso o evento. Estos procedimientos 
son conocidos habitualmente como triggers , disparadores o desencadena* 
dores. 


Otros» elementos lógicos 

En los cuatro puntos anteriores se han abordado los elementos lógicos de 
una base de datos que podríamos considerar de primer nivel: tablas, índices, 
vistas y procedimientos almacenados Estos. no obstante, no son los únicos que 
podemos encontrar. Una base de datos también puede alojar diagramas de da¬ 
los. reglas v valores predeterminados, asi como tipos de datos v funciones de¬ 
finidas por el usuario. 

Dos de las categorías de objetos importantes, desde el punto de vista de la 
seguridad, son los usuarios s' las funciones. Ininalmenle el único usuario exis¬ 
tente en una base de datos nueva de SQI Server es el conocido como dbo, ini¬ 
ciales de f ¿altibaje ou'itcr. Este usuario representa al dueño de la base de datos 
que, en principio, es el usuario que la ha creado. 

I as funciones representan conjuntos de permisos que pueden asignarse o 
negarse a los usuarios. 

Existe un grupo predeterminado de funciones v también podemos crear las 
nuestras propias. I as junciones va existentes, llamadas estándar, se identifican 
con tareas como la lectura de dalos, la administración de seguridad o la reali¬ 
zación de copias de seguridad. 




Introducción a 5QL 


Microsoft SQL Server es un sistema de bases de datos relaciona) que, como 
todos Jos demás, utilizan el lenguaje SQI para facilitar al usuario la ejecución 
de sentencias tanto de manipulación como de selección de datos. Conocer este 
lenguaje es, por tanto, básico para trabajar no ya con SQL Server, sino con cual¬ 
quier otro «DBMS v, en general, para poder desarrollar aplicaciones con trata¬ 
miento de bases de datos en Visual Basic .NE’Í. 

SQL es un lenguaje no procedo ral v orientado a datos. Esto significa que no 
tiene estructuras de control como las de los lenguajes de programación, va que 
su finalidad es devolver conjuntos de datos, modificarlos y, en el mas amplio 
sentido, manipular datos. Aunque SQL es un lenguaje estándar, ampliamente 
aceptado, existen algunas diferencias puntuales entre el dialecto de SQI que 
entiende cada RDBMS. Las construcciones básicas, no obstante, son suficien¬ 
temente genéricas como para funcionar en prácticamente cualquier sistema. 

F.n los puntos siguientes no se tratará de explicar todos los detalles del len¬ 
guaje SQI sino más bien transmitir los conceptos necesarios para que, en el ca¬ 
pítulo siguiente, pueda desenvolverse sin problemas al tratar los comandos de 
bases de datos de ADO.NET. 

El Analizador de consultas SQL 

Rara poder hacer pruebas con el lenguaje SQL necesitamos saber dónde po¬ 
demos introducir nuestras sentencias SQI para poder ejecutarlas y que el ser¬ 
vidor efectúe las operaciones que le indiquemos. En este caso la herramienta 
que necesitamos es el Analizador de consultas SQL de SQI Server. 

Rara abrir el Analizador de consultas SQL deberá desplegar el menú Herra¬ 
mientas del Administrador corporativo, seleccionando la opción que puede ver¬ 
se en la figura 20.3. No confunda ésta con la opción Analizador SQL que hay 
debajo y que no tiene nada que ver aunque el nombre sea similar. Se trata de 
una herramienta diferente cuya finalidad es examinar el Mujo SQI mientras se 
trabaja con una aplicación. 

Aunque las posibilidades de esta herramienta son muchas, para el fin que 
nos ocupa tan sólo tiene que saber cómo introducir las sentencias SQI v como 
ejecutarlas. Como se aprecia en la figura 20.4, correspondiente a la ventana del 
Analizador de consultas SQL, la mayor parte del área de trabajo está ocupada 
por una ventana en la que podemos introducir texto. Sera aquí, por tanto, don¬ 
de tecleemos las sentencias a ejecutar. Cuando procesemos las ordenes, pul¬ 
sando el botón que puede ver destacado encima o mediante la tecla Ff>, aparecerá 
un panel en la parle inferior con mensajes y resultados. 

Ln la parle izquierda de la ventana hay una página que puede usar para ex¬ 
plorar los diversos objetos que puede utilizar. De esta forma no liene por qué 
memori/ar los nombres de tablas, columnas, etc. Incluso puede tomar cualquie¬ 
ra de esos objetos y arrastrarlo hasta la ventana de texto para insertar el identi- 
ficador correspondiente. 
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Figura 20.3. Opción para abrir el Analizador de consultas SQL 



Componentes y derivados de SQL 


El lenguaje SQL (Structured Qun if ¡.attguage, Lenguaje estructurado de con¬ 
sulta) cuenta con múltiples construcciones cu va finalidad, tal como se ha dicho 






















antes, es manipular datos en algún sentido. Aprender SQL no es tan dilicil co¬ 
mo aprender un nuevo lenguaje de programación, aunque los derivados de SQI 
por cada fabricante llegan a niveles similares. 

Las distintas sentencias de SQI pueden englobarse en dos grupos, que po¬ 
dríamos decir que son los componentes de SQL. Kstos son DDL (Diitn Di'lhtition 
I ivi^ua^c, I enguaje de definición de datos) y DML (Daiti Mauipuluhon 
Lenguaje de manipulación de datos), lauto DDI como DML son partes inte¬ 
grales de SQL v forman parte del lenguaje estándar 

Después encontramos los derivados de SQI o dialectos basados en dicho 
lenguaje. Ln el caso concreto de SQL Server, Microsoft se ha basado en SQL pa¬ 
ra crear un derivado llamado Transact-SQL. Lsle cuenta con los elementos ne¬ 
cesarios para, por ejemplo, poder crear procedimientos almacenados. 

PPL_ _ _ 

Muchos usuarios piensan que el lenguaje SQI. se utiliza sólo v exclusivamen¬ 
te para efectuar consultas en una base do datos, de tal manera que conociendo 
la clausula SELECT v poco más ya hay suficiente. Hay otra parte del lenguaje 
SQI , sin embargo, cuya finalidad es definir estructuras de datos. Ls lo que se 
denomina Lenguaje de definición de datos o DDL.. 

Mediante este subconjunto de SQL podemos crear bases de dalos, definir 
tablas, crear índices, vistas y procedimientos almacenados, también puede ser 
usado para efectuar modificaciones sobre todas esas entidades, por ejemplo 
añadiendo columnas a una tabla o cambiando la intercalación de una base de 
datos. I as diversas operaciones que podemos efectuar mediante DDI son dis¬ 
tintas construcciones basadas principalmente en tres órdenes distintas: CREATE, 
ALTER y DROP. Mas adelante, en este mismo capitulo, tendrá ocasión de cono¬ 
cerlas. Con ellas podremos crear las labias que necesitemos, estableciendo sus 
el «i ves v relaciones. 

PMl _ _ _ 

1*1 subconjunto de SQL dedicado a la manipulación de los datos, denominado 
DMI es sm duda el mas conocido. Su finalidad no es actuar sobre las estructu¬ 
ras de la base de datos, sino sobre la información que hay contenida en ellas. 
Con DMI podríamos obtener todo el contenido de una tabla, combinar colum¬ 
nas relacionadas de varias tablas, actualizar datos, añadirlos o eliminarlos. 

Las cuatro ordenes más importantes de DML son SELECT, INSERT, DELETE 
y UPDATE, cada una de las cuales, como podrá ver a continuación, puede con 
lar con múltiples clausulas y variantes. En ocasiones podemos encontrarnos 
con combinaciones de DML y DDL. Es posible, por ejemplo, utilizar una con¬ 
sulta para crear una nueva tabla Estas construcciones en ocasiones tienen una 
sintaxis dependiente del RDBMS que esté utilizándose. 

T vá'ft&sct’SiQL 

Como se indicaba antes, cada sistema RDBMS suele usar un dialecto o deri¬ 
vado de SQI con características especificas que, en cierta manera, le permiten 



aprovechar las singularidades de ese servidor en particular. Un el caso de Mi 
i rosoli SQL. Server 2000. dicho dialecto recibe el nombre de Transa*, t SQL. 

Aunque todo lo que va a ver en el resto de este capitulo forma parte del len¬ 
guaje Transact-SQL, puesto que este es el derivado de SQL. que entiende SQL 
Server, realmente nos centraremos en las construcciones mas estándar, prácti¬ 
camente idénticas en todos los RDBMS actuales v en herramientas como Micro- 
son Access Sí tendríamos que usar Transact-SQI por ejemplo, a la hora crear 
Procedimientos almacen ad os. 

Definición de datos- 

Para poder manipular datos primero es necesario definir su estructura. Por 
ello comenzaremos conociendo algo de DDI ., el lenguaje para definición de da¬ 
tos. Con el podremos crear una base di* datos, tablas en su interior, efectuar 
modificaciones e incluso eliminar objetos. Puede ir comprobando las explica¬ 
ciones dadas ejecutando los comandos con el Analizador de consultas SQL. 
viendo los resultados en esa misma ventana o en las distintas ramas mostradas 
en el Administrador corporativo 

Con DDL podremos crear elementos con la orden CREATE, modificarlos con 
la orden ALTER y eliminarlos mediante la orden DROP Cada una de éstas tiene 
vanantes para operar sobre bases de datos, tablas, vistas, procedimientos alma¬ 
cenados, etc. 

Cualquiera de estas tres ordenes ira seguida de uno de los identilicadores 
enumerados en la tabla 20.1. Con ellos se indica la entidad que va a crearse, mo¬ 
dificarse o eliminarse. 


Tabla 20.1. Identificación de entidades a manipular 


Identificador 

Entidad 

DATABASE 

Base de datos 

TABLE 

Tabla 

VI EW 

Vista 

PROCEDURE 

Procedimiento almacenado 

TRIGGER 

Desencadenador 


Ademas de los enumerados en esta tabla, existen otros objetos que tan sólo 
son aplicables con alguna de las órdenes CREATE, por ejemplo, puede utilizar¬ 
se para crear un índice, pero este no puede ser modificado con ALTER. 


Creación de u na de <Aatoe> 

I a primera entidad que deberíamos crear es la propia base de datos, para lo 
cual usaremos la sentencia CREATE DATABASE. III único parametro imprescin 
dible es el nombre lógico de la base de datos, aunque opcionalmente pueden 
facilitarse muchos mas. 




Utilizando el Analizador de consultas SQL, la ejecución de la simple senten¬ 
cia CREATE DATABASE Pruebas crearía una base do datos llamada Pruebas 
utilizando parámetros por detecto para los nombres de los archivos tísicos, su 
tamaño, crecimiento y resto de propiedades. En la figura 20.5 puede ver el re¬ 
sultado obtenido tras ejecutar la sentencia. Puede utilizar el Administrador cor¬ 
porativo para comprobar que la base de datos ha sido creada. 
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Figura 20.5. Podemos crear una nueva base de datos con una sentencia 
muy simple 


En el momento de creación de la base de datos podemos especificar tanto el 
nombre del archivo de datos como el del archivo de registro do transacciones, 
podiendo también establecer su tamaño inicial, tamaño máximo y el tactor de 
crecimiento. Los parámetros para (‘I archivo de datos se facilitarán, entre parén¬ 
tesis, tras la clausula ON, mientras que los del archivo de registro, que son equi¬ 
valentes, lo harán detrás de las palabras LOG ON. 


CREATE DATABASE nombre 
ON (parámetros) 

LOG ON (parámetros) 

I os parámetros posibles, en ambos casos, son ÑAME, FILEÑAME, SIZE, MAX- 
SIZE y FILEGROWTH, facilitando el nombre lógico del archivo, su camino y 
nombre físico en disco, el tamaño inicial, el tamaño máximo y el crecimiento. La 
mayoría de estos parámetros son opcionales. 

Observe la imagen mostrada en la figura 20.6. La primera sentencia que apa¬ 
rece. DROP DATABASE Pruebas, elimina la base de datos del servidor puesto 
que. de lo contrario, no podríamos volver a crearla. Debajo la creamos de míe- 













vo estableciendo algunos de los parámetros del archivo de datos y de registro 
de transacciones. 
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Figura 20.6. Al crear una base de datos podemos establecer los atributos 
de los archivos de datos y registro de transacciones 


De forma similar, usando parámetros opcionales, podríamos establecer el 
orden de intercalación por defecto para la base de datos o definir un grupo de 
archivos de almacenamiento. 

Creación de tablas 

Otra de las variantes de la orden CREATE es CREATE TABLE que, como es 
obvio, usaremos para definir tablas en el interior de una base de datos. El pri¬ 
mer paso sera seleccionar la base de datos en la que va a efectuarse la opera¬ 
ción, para lo cual usaremos la sentencia USE nombre_base. A continuación 
ya podremos crear las tablas que necesitemos. 

I I parámetro mas importante* y único imprescindible a la hora de crear una 
labia aparte de su nombre, es la lista de columnas que deberá facilitarse entre 
paréntesis. Por cada columna debemos facilitar un nombre y un tipo. De forma 
adicional podríamos especificar si será la clave principal, cuenta con restriccio¬ 
nes. hace referencia a una clave de otra tabla, etc. 1.a sintaxis general, obviando 
todas esas posibilidades, es la siguiente: 

CREATE TABLE nombre 

( 

nombre_columna tipo, 
nombre_columna tipo ... 

) 







Lógicamente, para croar una tabla deberíamos conocer los tipos de dalos 
que hay disponibles Dos de los más habituales son smallint \ varchar. F.l 
primero de ellos es un entero mientras que el segundo es una secuencia do ca¬ 
racteres, debiendo facilitarse entro paréntesis su longitud máxima. 

Suponga que deseamos definir, en la baso do datos recién creada en el pun¬ 
to previo, una tabla para contener datos de libros. L 7 .n la figura 20.7 puede ver 
el comando usado F.n la ventana do mensajes tan sólo se indica que el coman¬ 
do so ha completado con éxito, lo cual significa que la tabla ha sido croada. Una 
vez mas, puede comprobar la operación desde el Administrador corporativo. 



Figura 20.7. Seleccionamos la base de datos y creamos una tabla en ella 


Utilizando opciones tomo PRIMARY KEY, CHECK y DEFAULT podríamos in¬ 
dicar qué columna actúa como clave principal, definir restricciones de datos o 
facilitar valores por defecto. Son algunas do las posibilidades existentes. 

Modificación dr u na tabla 

Con una correcta planificación y un estudiado diseno las modificaciones a 
la estructura do una baso do datos deberían sor, teóricamente, mínimas. Ilav 
que tener en cuenta que esto tipo de operaciones podrían, en determinados ca¬ 
sos, provocar pérdidas do información, algo que no es admisible para una baso 
de dalos que esté utilizándose en un entorno de explotación. 

Para efectuar cambios en una tabla usaríamos la sentencia ALTER TABLE 
seguida del nombro do la tabla v las opciones que correspondan. Básicamente 
podemos? efectuar Iros operaciones distintas: añadir columnas, modificarlas o 
eliminarlas. También puede utilizarse esta construcción para modificar, elimi 






nar o añadir opciones de una columna, como pueden ser los valores por delei 
lo o las reslr ice iones. 

Si deseamos cambiar una determinada columna, por ejemplo para modifi¬ 
car mi longitud o incluso el tipo de dato que le habíamos asignado en un princi¬ 
pio, debemos usar la sintaxis siguiente: 

ALTER TABLE nombre tabla 

ALTER COLUMN nombre columna uuevo_Lipo 

I.n caso de que el cambio sea una reducción de longitud o la modificación 
del tipo podría provocar, como acaba de decirse, una pérdida de información. 
AI ejecutar una sentencia de este tipo, como se lia hecho en la figura 21).S. en el 
panel de resultados el Analizador de consultas SQL nos indicara cuántas tilas 
de datos han resollado afectadas. I n este caso, puesto que la tabla rsla aun va¬ 
cia, los cambios en la estructura no afectan a los datos. 



Figura 20.8. Reducimos la longitud de una de las columnas 
de la tabla Libros 


I as construcciones para añadir v eliminar columnas de la tabla son simila¬ 
res, como puede verse a continuación, ten la figura 20 9 puede ver como se ha 
añadido una columna para el ISBN v se ha eliminado la columna que conten¬ 
dría el nombre del autor. 

ALTER TABLE nombre_Labla 
ADD nombre columna tipo 

ALTER TABLE nombre_•abla 

DROP COLUMN nombre columna 





Figura 20.9. Añadimos una nueva columna y eliminamos una de las existentes 

Otras» operacionee 

I n los punios anteriores hemos creado y modificado entidades como una 
baso de datos, una tabla y sus columnas Tanto CREATE como ALTER pueden 
utilizarse, asimismo, para crear un índice, modificar la configuración de una 
base de datos o una \ isla, La sintaxis es similar a la que hemos conocido en pa¬ 
sos previos. La tercera orden del lenguaje DDI que habíamos mencionado, 
DROP, la hemos usado en uno de los ejemplos para eliminar la base de datos \ 
asi poder volver a crearla Si en lugar de la palabra DATABASE ponemos detrás 
de DROP los parámetros TABLE, INDEX. VIEW, etc . seguidos del nombre de la 
tabla, índice o vista, estaremos eliminando el objeto reíerenciado. F.s la orden 
mas simple, pero también la mas peligrosa, téngalo en cuenta. 

Nota 

Efectúe todas las pruebas que desee, con las distintas órdenes DDL que ha 
conocido, siempre sobre una base de datos de pruebas. No utilice las en¬ 
tregadas como ejemplo con SQL Server 2000, comopubs, y mucho menos 
las bases de datos de sistema que, cornomaster, son imprescindibles pa¬ 
ra un correcto funcionamiento del servidor. 

Manipulación de datos 

Como se indicaba anteriormente, las operaciones fundamentales Je manipu¬ 
lación de datos son cuatro: selección, inserción, modificación v eliminación. 
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Figura 20.10. Insertamos dos filas de datos en la labia 








En este ejemplo se facilitan tantos valores como columnas existen en la ta¬ 
bla, respetando también el orden. Si no se entregan valores para todas las co¬ 
lumnas, o el orden es distinto, entonces la sintaxis a utilizar seria la siguiente: 

INSERT INTO nombre_t.abla (nombre_columna, •••) 

VALUES (valor, . . . ) 

I a figura 20.11 presenta dos ejemplos en los cuales se utiliza esta sintaxis. 
I n la primera inserción se facilitan los tres dalos, pero en un orden diferente al 
que ocupan las columnas en la tabla. En el segundo caso se entregan valores 
tan sólo para dos de las tres columnas, por lo que la tercera lomara el valor 
NULL. Fsto es posible porque al definir la tabla no hemos indicado que esta ta¬ 
bla no aceptase valores nulos. 



Figura 20.11. Insertamos filas con los valores en distinto orden 
o con menos valores 


5H acción ár 

La orden mas conocida del lenguaje DM1.., y en general de SQL., es sin duda 
alguna SELECT. Esta se utiliza para seleccionar un conjunto de dalos determi¬ 
nado. obteniendo una serie de lilas v columnas que pueden ser una labia com¬ 
pleta, una parte de una tabla o dalos de múltiples tablas relacionadas entre si 

F.l caso mas simple de selección es aquel en el que recuperamos una tabla 
completa de datos, como se ha hecho en la figura 20.12 con el Analizador de 
consultas SQL 

I a sintaxis, como puede verse, es bastante simple: detras de SELECT dispo¬ 
nemos un asterisco v Iras la palabra FROM el nombre de la tabla. 
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Figura 20.12. Seleccionamos todas las filas y columnas de la tabla Libros 

Podemos limitar las columnas a recuperar sustituyendo el asterisco por los 
nombres de las columnas que nos interesen, separando tinas de otras mediante 
comas. C on la sentencia siguiente, por ejemplo, obtendríamos todos los títulos 
e ISBNs de la tabla de libros, pero no sus códigos. 

SELECT Titulo, ISBN 

FROM Libros 

Si lo que deseamos limitar son las lilas devueltas, a la construcción anterior 
tendremos que añadir un nuevo apartado formado por la palabra WHERE y una 
expresión de selección. En dicha operación pueden utilizarse diversos opera¬ 
dores para buscar cierto dato, todos aquellos que sean menores, mayores, dis¬ 
tintos, similares, etc. 

En la figura 20.13 puede ver como se ha utilizado el apartado WHERE, conjun¬ 
tamente con el operador LTKE, para encontrar todos los libros cuyo titulo se 
inicia con la palabra Programación. En la parte inferior puede ver los resulta¬ 
dos devueltos. 

Modificación de datoe 

l a actualización de datos es una tarea habitual, consistente en modificar el 
valor de una o más columnas pertenecientes a una o más tilas, l o habitual es li¬ 
mitar la acción a un determinado conjunto de lilas, usando para ello la misma 
clausula WHERE que hemos usado anteriormente para seleccionar datos. 

En este caso la orden que nos interesa os UPDATE y la sintaxis básica es la 
mostrada a continuación: 
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UPDATE nombre íabLa 

SET nombre columna = nuevo valor 
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Figura 20.13. Seleccionamos algunas de las filas de la tabla Libros 

l\ir«i fací 1 i tar el nuevo valor podemos usar un dato constante, como los que 
previamente hemos insertado en las tilas de la tabla Libros, o una expresión. 
Podríamos, por ejemplo, sumar un determinado numero do ejemplares a una 
hipotética tabla Almacén que va tuviésemos creada. 

t on la sintaxis anterior la acluali/ación afectaría a todas las lilas del conjun 
to de dalos, sin excepción. Suponga que desea corregir el titulo de uno de los 
libros que ha introducido previamente», para lo cual pretende utilizar una sen 
teneja como la siguiente: 

UPDATE Libros 

SET V it u1 <*=*Programación DNA en Windows 2000' 

¿Qué conseguiría con esto? Perder los títulos de todos los libros que hav en 
ia tabla v establecer el mismo para todos ellos. Para conseguir lo que quiere 
tiene que limitar la operación a la lila concreta sobre la que debe rlectuarse el 
uimbio, usando la cláusula WHERE v una expresión que identifique dicha tila 
de manera única Podría, por ejemplo, comprobar el actual titulo o basarse en 
el ISBN, i orno se ha hecho en el ejemplo do la figura 20 14. A continuación pue¬ 
de ejecutar una consulta para verificar los cambios. 

t'limiriaí ion de d 

1.a ultima operación que podemos efectuar, de las cuatro mencionadas con 
aniel lor¡dad, es el borrado de filas de una columna. A dilereiu ia de lo que ocu 















rro con la selección, actualización e inserción, casos en los que puede afectarse 
solo a algunas columnas de la lila sobre la que se trabaja, el borrado tiene lugar 
siempre sobre una tila entera de dalos. 
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Figura 20.14. Cambiamos el título de uno de los libros 


Podemos usar la orden DELETE tanto para borrar todo el contenido de una 
tabla, simplemente facilitando el nombre de esta detrás, como para eliminar 
un determinado conjunto de tilas. En este segundo caso deberemos seleccionar 
dicho conjunto usando la cláusula WHERE, como se ha hecho previamente con 
la actualización. 

La sentencia para eliminar un libro concreto, por ejemplo facilitando su 
ISBN, podría ser la siguiente: 

DELETE FROM Libros 

WHERE ISBN** 1 84-4 1 5-1017-2 ' 

Puede comprobar de inmediato, con una sentencia SELECT, el efecto causa¬ 
do sobre la tabla. Con ésta ya conoce las cuatro operaciones fundamentales, 
por lo que puede insertar datos, seleccionarlos, modificarlos y eliminarlos. F.n 
principio, es lodo lo que necesita para trabajar con el Analizador de consultas 
SQL v hacer pruebas. 

f dación ás> entre tablae 

En este momento tenemos en nuestra base de datos de pruebas una sola ta¬ 
bla, por lo que difícilmente podemos relacionarla con ninguna otra. Para ver có¬ 
mo podemos usar la orden SELECT para obtener datos de dos tablas tendremos 








primero que crear otra, a continuación insertar datos en ella y, por ultimo, eje¬ 
cutar la consulta. 

Supongamos que ahora queremos crear la tabla Almacén para contener el 
número de ejemplares que hay de cada título. Esta tabla tendría tan sólo dos co¬ 
lumnas: IDLibro y Cantidad. La crearíamos con la siguiente sentencia SQI : 

CREATE TABLE Almacén 

IDLibro sinallint, 

Cantidad smallint 

) 

Un principio, como es lógico, la tabla estará vacia, tendríamos que insertar 
algunas tilas facilitando por cada una de ellas un código de libro y la cantidad 
que tenemos de él. rodemos utilizar cualquier valor e insertar, por ejemplo, 
tres tilas. 

INSERT INTO Almacén VALUES (1, 3) 

INSERT INTO Almacén VALUES (2, 5) 

INSERT INTO Almacén VALUES { b, 1) 

Ahora tenemos una tabla con el código, título e ISBN de varios libros, y otra 
que contiene una serie de códigos y número de ejemplares. Si obtenemos el 
contenido de la tabla Almacén, estos datos no nos dirán mucho por si solos a 
menos que conozcamos de memoria los códigos de los libros. Lis mucho más 
fácil combinar ambas tablas creando la oportuna relación que. en este caso, se 
basará en el código del libro, l a sentencia seria la siguiente: 

select * 

from Libros, Almacén 

where Libros.IdLibro * Almacén.1dLibro 

Observe la expresión que sigue a la cláusula WHERE En ella solicitamos 
aquellas lilas de la combinación de tablas en que la columna IdLibro de la 
primera sea igual a la columna del mismo nombre en la segunda. En este caso 
ambas columnas tienen el mismo nombre, pero esto no es absolutamente nece¬ 
sario. I I resultado, como puede ver en la figura 20.1S, os que junto al titulo de 
cada libro ahora también vemos el número de ejemplares disponibles 

Si en lugar de * hubiésemos especificado el nombre de algunas columnas, 
tras la orden SELECT, el resultado podría ser más c laro Pruebe, por ejemplo, a 
solic itar tan sólo el titulo de cada libro y la cantidad disponible. 

Puntos clave 

• Una base de datos es un recipiente lógico donde almacenar información, 
tanto datos como la estructura do esos datos v la lógica necesaria para 
tratarlos 




Figura 20.15. Relacionamos las dos tablas para obtener datos conjuntos 


• Físicamente una baso do datos está compuesta do uno o más archivos en 
disco. 

• En la práctica nunca os necesario abrir osos an. hivos y trabajar directamen¬ 
te con ellos, porque las aplicaciones utilizan los RDBMS como interme¬ 
diarios para la gestión de dalos. 

• I os elementos básicos de una base de datos son las tablas, conjuntos de 
lilas de datos compuestas cada una de ellas de una serie de columnas 

• L1 acceso a los dalos puede acelerarse definiendo los índices adecuados 
sobre las columnas de las tablas. 

• Una base de datos también puede contener vistas, procedimientos almace¬ 
nados v otros elementos de utilidad. 

• Rara trabajar con sistemas RDBMS es fundamental conocer el lenguaje 
SQI Éste se compone de dos subconjuntos: DDL v DMI . utilizándose el 
primero para manipular las estructuras de la base de datos v el segundo 
los datos propiamente dichos. 

Resumen 

tn caso de que no conociese previamente SQL Server v el lenguaje SQL, se¬ 
guramente este capitulo le habrá sido de utilidad para adquirir los conocimien¬ 
tos mas básicos y poder realizar diversas operaciones sobre una base de datos 












experimental. Estas pruebas le servirán para, posteriormente, saber cómo actuar 
sobre bases de datos reales. 

Si, por el contrario, va conocía estos conceptos, o incluso es un experto en 
SQI , lo cierto es que este capítulo le habrá sabido a muy poco. Todas las orde¬ 
nes que se han explicado cuentan con múltiples opciones y variantes, aparte de 
las ya explicadas. Aquí es, no obstante, donde le será de utilidad Ja referencia 
de Transact-SQL que forma parte de los libros en pantalla de SQL Server. 







21 

Acceso a datos 
con APO.NET 


Una necesidad invariable de los desarrolladores de aplicaciones, indepen¬ 
dientemente de cuál sea la finalidad de éstas, es el acceso a datos, en su más 
amplio sentido, y el tratamiento de bases de datos, para ser más concretos. En 
la actualidad dicha necesidad implica, básicamente, el trabajo con dos tipos de 
fuentes de datos: documentos XML y sistemas RDBMS como SQl. Server, Ora¬ 
cle o DB2. 

I as soluciones para simplificar el acceso a datos desde los lenguajes de pro¬ 
gramación más usuales han sido muchas y diversas, generalmente dependien¬ 
tes de un cierto fabricante v, en muchas ocasiones, ligadas a una determinada 
plataforma, sistema operativo o incluso lenguaje. No obstante, existen algunos 
hitos importantes que, con el tiempo, han sido fundamentales, como el lengua¬ 
je SQL (Struitureil Qucry Laitguagc) o bien el estándar ODBC (Opea Databasc 
Conncctivit i/). 

Originalmente Windows no incorporaba mecanismo alguno para facilitar el 
acceso a datos, lo que causó que diversos fabricantes aportasen productos pro¬ 
pios junto a sus herramientas de desarrollo. Asi. mientras que con Visual Basic 
o Visual C++ podía utilizarse DAO (Data Access Ob/trfs) otros entornos muy 
conocidos, como Borland Delphi, incorporaban un mecanismo alternativo lla¬ 
mado BDE (Borland DataBase Engine). 

I a aparición de Windows 2000 marcó un antes y un después. A partir de ese 
momento era el propio sistema operativo el que incorporaba los mecanismos 
necesarios para acceder a bases de datos, l a base eran los controladores 01.1 
DB para distintos sistemas RDBMS y ADO (ActiveX Data Obfect s) como interfaz 
de alto nivel para comunicarse con esos controladores. Todas las herramientas 







de desarrollo pueden utilizar esas interlaces, a través de COM, y va no es pre¬ 
cisa la redistribución del motor de acceso a dalos siempre que el sistema desti¬ 
natario sea Windows 2000. 

Como no podía ser de otra manera, la llegada de la plataforma .NET trae 
consigo una evolución de los mecanismos de acceso a dalos. ADO dejara paso a 
ADO.NE I un modelo de objetos más avanzado que simplifica la construcción 
de aplicaciones en múltiples niveles al facilitar el trabajo sobre conjuntos de 
datos sin necesidad de mantener una conexión continua con el sistema RDBMS 
Nuestro objetivo, en este capítulo, es conocer básicamente ADO.NE I y la tur¬ 
ma de utilizarlo desde Visual Basic NE I 

Modelo de objetos de AD0.NET 


ADO.NE I es un modelo simplificado de acceso a dalos en el que existen bá¬ 
sicamente dos elementos: el conjunto de dalos desconectado, representado por 
el objeto System. Data . DataSet y unos proveedores que facilitan la ejecu¬ 
ción de operaciones contra un sistema RDBMS. Actualmente tenemos a nuestra 
disposición adaptadores para acceder a dos tipos de proveedores SqlData- 
Adapter v OleDbDa t aAdapter. definidos en los ámbitos System. Data . Sql - 
Client y System.Data.0leDb 


Nota 

Está en desarrollo un tercer proveedor, en fase de beta en el momento de 
escribir este libro, que permitirá utilizar ODBC (Open Database Connectivity) 
desde ADO.NET sin necesidad de recurrir al puente OLE DB-ODBC. 


I I esquema de tuncionamiento consiste, básicamente, en utilizar uno de los 
adaptadores para conectar con el RDBMS, recuperando un conjunto de datos v 
cerrando la conexión. Ese conjunto, que seria un objeto Data-Set, puede ser 
transferido entre aplicaciones y puede operarse sobre el prácticamente como si 
fuese una base de dalos. Finalmente, se restablecería la conexión utilizando el 
citado proveedor v se enviarían al RDBMS las actualizaciones que fuesen perti¬ 
nentes. 

La representación interna de los dalos, por parte del objeto Dataset. utili¬ 
za el lenguaje XMI l a información transferida de un punto a otro, por tanto, 
es un flujo XMI independiente del sistema operativo, plataformas v lenguay s 
En la tíguia 21.1 puede ver una representación gralica de los elementos que in 
tervienen en el acceso a dalos usando ADO.NE I 

Estructura de un objeto DataSet 

Un objeto DataSet facilita e! trabajo con una base de datos sin necesidad 
de mantener una conexión continua. I o que obtenemos es una representación 





en memoria de esa base de datos, y observe que decimos base de datos y no 
simplemente una tabla. Previamente, en el modelo A DO, el objeto principal de 
trabajo era el Recordset: la representación lineal de una sola tabla Un Data- 
Set, por el contrario, puede albergar múltiples tablas y, ademas, las relaciones 
existentes entre ellas o las reglas de validación, permitiendo asi efectuar opera¬ 
ciones complejas sin necesidad de restablecer la conexión con el RDBMS. 


ADO.NET 

— 


DataSet 

RDBMS 

SqlDataAdapter 

OleDbDataAdapter 





Figura 21.1. Modelo de acceso a datos utilizando ADO.NET 

Internamente el DataSet mantiene una colección de tablas, estando cada 
una de ellas representada por un objeto DataTable. Cada tabla puede prove¬ 
nir incluso de bases de datos diferentes. Aparte de relaciones v reglas de vali¬ 
dación una tabla contendrá, lógicamente, datos. Las distintas tilas y columnas 
se representan mediante objetos DataRow y DataColumn, respectivamente. 

La figura 21.2 es una representación simplificada de la estructura de un 
DataSet que, en este caso concreto, está formado por dos DataTable Cada 
uno de estos contiene sus propios objetos DataRow y DataColumn No apare¬ 
cen en la figura otros elementos que no contienen datos propiamente dichos, 
sino información adicional como las citadas relaciones entre tablas o las reglas 
de validación. 




Figura 21.2. Estructura simplificada de un objeto DataSet 






Creación de un DataSet a partir de u na tabla 

/ 

Para poder utilizar algunas de- las propiedades do un objeto DataSet. por 
ejemplo con el fin do obtener los nombres v columnas de una labia alojada en 
una base de dalos, primero tendremos que crear el DataSet. l-slo es tan fácil 
como crear cualquier otro objeto de una c lase cu alquiera P.n ese momento ten¬ 
dríamos un DataSet vacio. I I siguiente paso seria eMrrblecer una conexión 
con una base de datos v llenar el DataSet. va sea a partir cié una labia o una 
consulla que afecte a varias. 

Asumiendo que tenemos instalado SQI Server 7, SQI Server 20011 o MSDI 
Dala I ndine), utilizaríamos un objeto Sq 1 DataAdapter para conot- 
tai con una de las bases de datos de ejemplo \ ejecutar una consulta. I odo esto 
puede electuarse en el mismo momento en que se crea eI objolo. gracias a que 
lino de sus constructores loma dos parametros Ja sentencia SQI ,i ojee ular \ la 
c aiiena de conexión. Fl siguiente fragmento, por ejemplo, cone» tana i on la ba¬ 
se» de datos pubs. una de las entregadas como ejemplo con SQI Server, \ ob¬ 
tendría todo el contenido de la tabla authors. 

Din» Comando As Sq 1 Da! aAdaptei New Sq 1 Da l uAdapt ei < 

"SEr.ECT • FP.OM authors", "server-TN5PT RON; u id sa;aa tabase-pubs " > 

i:n mi caso concrete» se esta accediendo .1 SQI Ser\ er 2000. un sistema KDBMs 
que se ejecuta en el servidor 1NSPIRON l a cuenta usada es la del administra 
dor ele sistema 

De lodos los miembros e on que cuenta un objeto de la clase Sq 1 Da taAdapter 
en este momento nos interesa tan sólo uno el método F i 1 1 ( ) bste toma como 
primer parámetro un objeto DataSet v copia en el el resultado de ejec utar el 
minando indicado prev iamente I I segundo parámetro seria el nombre de la 
tabla creada en el DataSet \. normalmente, coincidirá con la obtenida en la 
consulla. 

Recuperación de la estructura de un DataSet 

Dados los dos pasos previos va tenemos un DataSet con información, con 
1 ralamente con todas las tilas v columnas de una tabla. Podríamos repetir el 
proceso tantas veces como lo necesitáramos, añadiendo nuevas tablas al mis 
nn» DataSet Veamos ahora cómo podemos obtener Ja estructura de (a infor¬ 
mal ion contenida en el. concretamente el nombre de las tablas v la> columnas 

Id objeto DataSet dispone de una propiedad llamada Tables que es una 
1 olee c ion de objetos DataTable. Podemos enumerar dicha colección para recu¬ 
perar datos de las tablas, t ada DataTable cuenta con propiedades diversas 
\, entre ellas, una llamada Columns que, como puede imaginar, es una uilrc- 
cion de objetos DataColumn Un objeto de este tipo describe a una columna de 
la labia. 

( mintiendo sólo estos elementos podemos utilizar un ejemplo como el si¬ 
guiente para generar la salida que puede verseen la tigura 21 v Se trata de una 



página ASP.NET que genera una tabla HTMI con el nombre v tipo de columna 
de cada tabla que exista en un DataSet. 


Dira Conexión As String = "server=loca 1host ; u i d = sa;database-pubs“ 


Dim Comandol As Sql Dal.aAdapi er New 

Sq 1 Da taAdapLer ( " SFI.FCT * FROM auchors", Conexión) 


Dim Comando2 As Sq1DataAdapter * New _ 

Sq1 DataAdapter("SELECT * FROM titles", Conexión) 


Dim MiDataSet As DataSet = New DataSet() 
Dim MiTabla As DataTabie 
Dim MiColumna As DataColnmn 


Comando 1. Fii l (MiDataSet, "Autores”) 
Comando2.Fi11(MiDataSet, "Títulos") 


For Each MiTabla In Mi DataSet.Tab1 es 


Response.Wr i te("Tabla: <b>" í> MiTab La . Tab 1 eName k , '</b><hr>" k 
"<table border-1 ><tr><td><b>Nombre</b>< / td>" i. 

"<t.d><b>Tipo< /b></ td></tr>") 


For Each MiColumna In MiTabla.Columns 

Response.Write("<tr><td>" k MiColumna.Co1umnName k 

M </td> H & "<td>" k MiCo1umna.DataType.Ñame k "</ td></tr>") 

Next 

Response.Write("</table><hr>") 

Next 


Nota 

Inicie un nuevo proyecto de aplicación Web ASP.NET en lenguaje Visual 
Basic.NET, añada el ámbito System. Data.sqlciient a la lista de sen¬ 
tencias imports y, finalmente, introduzca el código anterior en el método 
correspondiente al evento Load de la página. 


Ademas del nombre y tipo de cada columna, podríamos utilizar las propie¬ 
dades de la clase DataColumn y DataTabie para mostrar el valor por delecto 
que tiene cada columna, si permite valores nulos, obtener las reglas de valida¬ 
ción de la tabla o bien su clave primaria. Tan sólo hay que consultar la referen¬ 
cia de clases en System. Data para encontrar los miembros que necesitamos 
utilizar 





Figura 21.3. La página mostrando la estructura de las tablas 


Control de la conexión 

I n caso de que pretendamos ejecutar múltiples comandos sobre una misma 
base de datos, como hemos hecho en el ejemplo del punto previo, en lugar de 
establecer la conexión, ejecutar \ desconectar, empleando algún tiempo en un 
proceso que después tendremos que repetir, podemos separar lo que es la co¬ 
nexión del comando Con este lili podemos utilizar el objeto SqlConnec t ion 
para represenlat la conexión, abriéndola y cerrándola cuando nos convenga. 


Nota 

Recuerde que todos los objetos del espacio System. Data . SqlCl i ent 
están pensados para trabajar con SQL Server Si desea usar otro RDBMS 
| utilice el espacio System. Data . oleDb, sustituyendo en los nombres de 





las clases el prefijo Sql por oleDb. La conexión con cualquier otra base 
de datos, por tanto, se efectuaría con un objeto oleDbConnection. 


Un objeto SqlConnection dispone, entre otros, de los métodos Open( ) y 
Close( ). F.stos, como podra suponer, son los encargados de abrir y cerrar la 
conexión entre el objeto SqlConnection v el sistema RDBMS. Mientras esta 
abierto podemos ejecutar todos los comandos que precisemos, sin el retardo que 
supondría cerrar y volver a abrir la conexión a cada paso. 

Nuestro ejemplo anterior podría codificarse sustituyendo la actual declara 
cion de la variable Conexión por la siguiente: 

Dim Conexión As SqlConnection * New 

Sql Conree t. ion( "servef=INSPI RON ; u i d = sa ; pwd*; da tabas e = pubs " > 

Antes de llamar al método Fill( ), para obtener los datos, utilizaríamos el 
método Open ( ) de Conexión para abrir la conexión con la base de dalos Tras 
recuperar toctos los datos usaríamos el método Cióse( ) para cerrarla F1 re¬ 
sultado seria exactamente el mismo, la diferencia es que ahora la conexión y 
desconexión se efectúa una sola vez. lo cual redundara en un menor tiempo pa¬ 
ra efectuar las consultas, Fsto será especialmente visible si estamos usando una 
conexión remota 

Acceso a los datos 


Hasta ahora hemos estado trabajando con lo que se denomina la mctuinfoi 
nuil ion de la base de datos, utilizada para describir su estructura I as tablas de 
una base de datos contienen, lógicamente, datos útiles, bn el caso de la tabla 
titles, por ejemplo, disponemos de columnas con títulos de libros, techas de 
publicación, precios, etc. 

I os objetos DataTable disponen de la propiedad Rows, una colección de 
objetos DataRow cada uno de los cuales representa a una lila de datos de la ta¬ 
bla. A su vez, cada fila esta compuesta de columnas, tantas como indique la co¬ 
lección Columns Rodemos utilizar la propiedad Rows como si fuese un arreglo 
gracias a que cuenta con una propiedad que actúa como indexadora, siendo el 
índice bien el nombre de la columna o su número de orden. 

Fíectliando algunos cambios al código de la pagina ASP.NK I usada como 
ejemplo en los puntos anteriores, podríamos conseguir un resultado como el 
de la figura 21.4. 

Lo que hacemos, básicamente, es recorrer cada fila de la tabla conviniéndo¬ 
la en una fila de una tabla 11TMI Añadiendo algunos controles a la pagina 
ASP.NET se puede facilitar, por ejemplo, la ejecución de una consulta sobre la 
tabla de títulos en lugar de devolverla entera. 


Dim Conexión As SqlConnection *- New SqlConnection! 
"server*INSPIRON;uid“sa;pwd“;database*pubs") 



. I * *1 


Jli.l 


.ti M 

Dim Comando As SqlDataAdapter = New __ 

SqlDat aAdapter ( "SEI.ECT * FROM Titles", Conexión) 


Dim MiDataSet As DataSet » New DataSet() 


Comando.Fill(MiDataSet, "Autores") 

\ «i** #>■»•* .* * * * 

Dim MiTabla As DataTable MiDataSet..Tablea( "Autores" ) 

Dim Columna As DataColumn 
Dim Fila As DaiaRow 

Dim Ind As Integer 

Response.Write("<table border-1><tr>") 

For Each Columna In MiTab1 a.Columns 

Response.Write("<td><b>" ¿ Columna.CoiumnName » "</b></td>") 

Next 

Fesponse.Wri te( "</tr>" ) 


• > 'ímk «m.i.s .« -i* *l tf"< 

For Each Fila In MiTabla.Rows 
Response.Write("<tr>") 

For ind * 0 To MiTabla.Columns.Count - 1 

Response.Write("<td>‘* & Fi1 a(Ind).ToStrinq() f "</td>") 

Next 

Response.Write{" < /1 r >") 

Next 

Response . Wr i te < *'</table>“ ) 

Las referencias del tipo Fila(Ind) o Fila( "title" ) pueden usarse no 
sólo para obtener el valor de un cierto dato, sino también para modificarlo me¬ 
díanle una simple asignación. Hay que tener en cuenta, no obstante, que esta¬ 
mos trabajando con un conjunto de datos sin disponer de una conexión al RDBMS, 
por lo que los cambios serán visibles, al menos en principio, sólo localmente. 

Actualización de los datoe 


FI objeto Sq 1 DataAdapter dispone de cuatro propiedades que apuntan a 
otros tantos objetos SqlCommand. Dichas propiedades son SelectCommand 
UpdateCommand, InsertCommand y DeleteCommand, siendo su finalidad 
mantener las sentencias v parámetros necesarios para permitir la selección de 
datos, su actualización, inserción y borrado, respectivamente. Estos comandos 
se utilizan cuando se efectúa una actualización. 

Cualquier cambio que efectuemos en el DataSet permanecerá en este hasta 
que efectuemos una llamada al método Update( ) del SqlDataAdapter In 
ese momento se utilizarán los comandos citados para transferir todas las modi¬ 
ficaciones al RDBM5. 
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Figura 21.4. Podemos consultar el contenido de la tabla desde cualquier 
navegador a través de Internet 

F.l siguiente fragmento de código, por ejemplo, añadiría un nuevo autor a la 
tabla authors 


Dim Conexión As SqlConnect. ion = New SqlConnection { 
"server=INSPiRON;uid=sa;pwd=;database^pubs") 


Dim Comando As SqlDataAdapter = New 

SqlDataAdapter("SELECT * FROM Authors", Conexión) 

i.i” • P»! f .».'»• f '* •' 

Dim MiDataSet As DataSet = New DataSet() 

t I • > t . • €«•< 1 Vl*f .‘4 f -I 

Comando.Fi1] (Mi DataSet, "Autores") 

' I , \7»* .* .fW» Í'K* I i-!-; f‘||i •• *1 i* i ,- 

Dim MiTabla As DataTable = MiDataSet.Tables("Autores") 


Dim NuevaFila As DataRow =» MiTabla.NewRow() 




1 ff.tl W.ciVff.ll Jy,< k JÍ-,>:r*0 

NuevaFila("au_id") - "123-45-6789" 

NuevaFi1 a("au_lname") * "Charte" 

NuevaFila(“au_fname") = "Francisco" 

NuevaFila("phone") * "999 222 333" 

NuevaFi1 a("address") * "Apdo. 54" 

NuevaFila("City” ) - "Jaén" 

NuevaFilaí“zip") « "23080" 

NuevaFila("contract") * False 

* La añadimos a la tabla 
MiTabi a.Rows.Add(NuevaFila ) 

Kn este momento la nueva fila se .encuentra en el DataSet, pero no en la ba¬ 
se de ciatos de la que se han recuperado previamente las demas tilas. Tenemos 
dos opciones: asignar manualmente a la propiedad InsertCommand la sen¬ 
tencia SQL para efectuar la inserción de la nueva tila o. dado que la actualiza¬ 
ción sólo afecta a una tabla, usar un componente SqlCommandBuilder para 
generar automáticamente los comandos de actualización, inserción y borrado. 
Utilizando este segundo sistema bastarían las dos sentencias siguientes, detrás 
del código anterior, para ejecutar la inserción de la fila en el servidor de datos. 


- • >• • .*ir »z • < • »- .. .* 

Dim Comandos As SqlCommandBuilder * 
New SqlCommandBuilder(Comando) 


Comando.Updat e( M iDataSet, "Autores") 

En la figura 21.5 puede ver la tabla tras efectuar la operación. Para obtener 
este resultado so ha añadido al mismo formulario un botón y modificado el có¬ 
digo para enumerar las filas de la tabla de autores en lugar de la de títulos. 


Nota 

Si pulsa dos veces el botón para añadir verá que obtiene un error, concre¬ 
tamente una violación de la clave primaria, ya que no pueden existir dos 
autores con el mismo código. 


Enlace de datos e interfaz 


En los puntos previos hemos estado accediendo a los datos desde el código 
de nuestros ejemplos, mostrando la información o modificándola, l a mayoría 
de las aplicaciones, sin embargo, no efectúan estas tareas de forma directa, si 
no ofreciendo a los usuarios una interfaz que les facilite la visualización, modi¬ 
ficación. eliminación c inserción de dalos. 

Obviamente podríamos, siguiendo la técnica utilizada anteriormente en di¬ 
chos ejemplos, recuperar los datos, asignarlos como contenido de controles, 




permitir que el usuario se desplace y modifique y. finalmente, ejecutar ma¬ 
nualmente los métodos que procedan. I.s mucho mas fácil, sin embargo, utili¬ 
zar loque se .conoce como enlace entre controles de interfaz y datos o 
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Figura 21.5. La tabla de autores tras la operación de inserción 


A pesar de que el enlace a datos de muchos controles Web y Windows e\ ita 
tener que efectuar asignaciones entre las columnas y los controles, no automati¬ 
zan completamente todo el proceso de edición de datos. F.sto es especialmente 
cierto en el caso de las aplicaciones basadas en formularios Web, en las que se¬ 
rá preciso habilitar, por ejemplo, medios para la inserción o para la eliminación 
de 1 ilas. 

Enlace en aplicaciones Web 

Algunas de las clases de controles de ser\ idor existentes en el ámbito Sys¬ 
tem. Web. UI .WebControls v que, por tanto, pueden insertarse en formula 
ríos Web, disponen ele propiedades mediante las cuales es posible establecer 
un enlace con un origen de datos. LI control ListBox, por ejemplo, se puede 
asociar con una determinada columna de una tabla para mostrar sus valores. 





Mediante el ronIrol DataGrid podemos establecer esa asociación con una ta¬ 
bla completa. 

La conexión con la base de dalos v obtención de un DataSet se efectúa si¬ 
guiendo exactamente el mismo proceso usado en ejemplos previos. I ras eso bas¬ 
ta con asignar a la propiedad DataSourcede los controles web una referencia 
al origen de datos que, por regla general, será un objeto DataSet o DataV íew 

Puede hacer una simple prueba insertando en un formulario Web un compo¬ 
nente DataGrid, estableciendo las propiedades que afectan «ti aspecto de la 
tabla, como se ha hecho en la figura 21.b. y, finalmente, escribiendo el código si¬ 
guiente en el método correspondiente al evento Load: 


Dim Conexión As Sq LConneotion *- New SqlConnection( 
"server*INSPÍ RON;uid^sa; pwd = ; dat abase = pubs " ) 


Dim Comando As SqJ Dat.aAdapter - New _ 

Sq1DataAdapter("SELECT * FROM authora", Conexión» 

Dim MiDat.aSet As DataSet - New DataSet ( ) 

Comando.FilL(MiDaf-a.Set, M Autores") 


DataGridl.DaiaSource MiDataSei.Tables("Autores"i 
DataGridI.DataBind( ) 
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Figura 21.6. Diseño del formulario Web con el componente DataGrid 









Observe como creamos un DataSet recuperando la tabla de autores. L1 ul¬ 
timo paso es llamar al método DataBind< ) para activar el enlace entre el ori¬ 
gen de datos v el control. En la figura 21.7 puede ver el resultado que obtenemos 
al ejecutar el programa. 

Si quisiéramos habilitar la edición de datos en la propia rejilla deberíamos 
disponer los elementos adecuados, por ejemplo botones, v responder a los even¬ 
tos generados por la rejilla a medida que se manipula la información. 



Figura 21.7. Tabla generada por el componente DataGrid 


Enlace en aplicaciones Windows 

Para construir una aplicación Windows con componentes de interfaz enla¬ 
zados a datos se utiliza un mecanismo prácticamente idéntico al que acaba de 
describirse en el punto anterior Para conseguir una aplicación similar a la pa¬ 
gina ASP.NI T anterior, con una rejilla mostrando el contenido de la tabla de 
autores, podríamos insertar un componente DataGrid en un formulario Win¬ 
dows e introducir el código que puede ver a continuación en el método corres¬ 
pondiente al evento Load del formulario. 


Dim Conexión As SqlConnection = New SqlConnecLion( 
"server^TNSPIRON^uid^sa;pwd=;dat abase = pubs") 



























Dim Comando As SqIDataAdapter = New _ 

SqlDataAdapter("SELECT * FROM authors", Conexión) 


Dim MiDataSet As DataSet s New DataSetf) 
Comando.Fill(MiDataSet, "Autores“) 


DataGrid1.DataSource * MiDataSet 
DataGrid1.DataMember = "Autores" 


Observo que. nuevamente, todo el proceso de conexión v selección de datos 
es idéntico al que ya conocemos. Lo único adicional es la asignación a las pro¬ 
piedades DataSource y DataMember, la primera de ellas tomando una referen¬ 
cia al DataSet y la segunda tomando el nombre de la tabla que quiere mostrarse. 
El resultado seria como el de la figura 21.8. 

Como se puede ver en la mencionada figura, el aspecto de esta rejilla es, en 
principio, bastante más atractivo que el de la rejilla HTML. Además, no tene¬ 
mos que hacer nada especial para, por ejemplo, seleccionar una columna y mo¬ 
dificar su contenido, aunque la actualización real en la base de datos no se 
efectúa automáticamente. Tendríamos que añadir al menos un botón que se en¬ 
cargase de efectuar la actualización tal y como se indicó en un punto previo. 


■» Formí 








fcPMx'i 

: .- —" - ~ -i 




1.1 _tranw 

C*m 

xan 

r* 

«*» 

* 

ctntaei 


» 


Oaam 

Fnncoco 

939227 213 

¿Vác U 

Jsé* 

•Tvll 

J*» 

í 

I' 



WMt 

4)mtt 

na «t.*?;* 

1QJ17 Btyjr 


O 

9*07* 

p 



líiwwm 

Qnm 


masc-roao 

3096MS) 

litare 

CA 

W'í 

P 




Cano) 

Chcn» 

msu -r?i 

^[».n 


SA 

94-T* 

p 




CTUvv 

Mc'im) 

«B2SC-W» 

7J CVv^i 

9v>XM 

CA 

*5>2* 

p 



77A8MMI 


C+*r 

4KW7*'» 

U» <*HUk 


CA 

V«9 

p 



mi-í 3 mu 

5*nrt' 

Merx*. 


'.0 MiwnWi 

IfMTU 

KS 


r 



o^a-tooi 

Bwoe 


4*9698 993? 

*22 ? £V»*n-i» 


Ca 

«ÍTX 

;» 



«r-rwt 

(M 

An* 


MiDBbrO* 


<A 

943C1 

i? 





fcurt 

’tru wmí, 

POto-9; 


<A 


» 



«MK 



4USHAS30 


W«rosc 

CA 

9*1* 

0 



ST-^-3» 

'W* 



2?(«sfc»H 

NatfHkc 

TN 

HÍ1* 

r 






W *S4tt 2 

9SH4Lu*ta8 

Cor-iii 

OP 

971» 

p 



j«77 n E*9 

Vrtoirvuj 

6**0 

*n*nwi 

? A.«Cf 

>f4 

CA 

91999 




¡7tJ45-V*7 

a»H Ititár 

Irm 

♦i*t*t?* 

¿fttCfsn* 

4vi 

MI 

4*1» 

p 



7341-MU 

L* <>*-«• 

MtfA 

219 W'9*2 

SfcMrfN 

J*ry 

tfl 

«*4©J 

p 



*24-»M31 


M 

IT9W3?»' 


:**tarí 

CA 

94409 

1 



'74«Vft»T 

M > WT-». 

5 Hvr* 

4T9 9J4--TJI 

U MI 

IsfrWnd 

*'A 


19 




Kinri 

Las 

4H«AfJ1| 

V20Mr**r 

* 

CA 

M«S 

P 



|*7 *t«*4 

Parteé 

SA- 

»'9494*93 

IJ54 ¿nrv»: 

«eck-fc 

MC« 

2080 

P 



[IWJill 

KuH«> 

Sf** 

415B3&.712Í 

34H5 Htono* 


CA 

H3C1 

P 



8W2V9I 

Mr 6*»rr 

H*«Cwr 

-0* UI4JC 

TOIñíihw 

v > éf 

CA 

***** 






¿mmm 

»'«« 

rw t 

W 1*1* -*v 

(TT 

Bit**: 

P 





“4*it 


**-■**■ i 

B. 

•JT 

l*T52 

P 


• 












Figura 21.8. El formulario Windows mostrando la tabla de autores 


La colección DataBindings 

Además de las propiedades DataSource v DataMember, de la que dispo¬ 
nen algunos componentes que están diseñados específicamente para usarlos 






con bases de dalos, la mayoría de los controles .NET disponen de una propie¬ 
dad, llamada DataBindings, que facilita el enlace de una cierta propiedad del 
control con oirá propiedad de olro componente. Es un mecanismo muy flexible 
que puede utilizarse no solo para conectar una caja de texto con una columna 
de una tabla, que puede ser lo más usual, sino para enlazar cualquier propie¬ 
dad de un control con otra propiedad de otro control. 

DataBindings es una colección de objetos DataBinding v, como tal, pue¬ 
de contener uno o más objetos de esa clase. Esto significa que un mismo com¬ 
ponente puede contar con varios enlaces de datos. 

Como toda colección, DataBindings dispone de un método, llamadoAdd( ), 
que facilita la adición de objetos. 

Al crear un objeto DataBinding deberemos facilitar tres parámetros la 
propiedad a enlazar en el primer componente, al que va a añadirse el enlace, 
una referencia al segundo componente y el nombre de la propiedad de ese se¬ 
gundo componente. Puede hacer una prueba simple insertando en un formula- 
rio dos controles TextBox y añadiendo el código siguiente al evento Load del 
formulario: 


Dim Conexión As SqlConnect ion New SqlConnection( 
"server-INSPIRON;uid=sa;pwd=;database-pnbs") 


Dim Comando As SqlDataAdapter New 

Sq1DataAdapter("SELECT * FROM anchors", Conexión) 


Dim MiDataSet As DataSet. = New DataSet ( ) 
Comando.Fiii(MiDataSet, "Auiores") 


♦ 1 J • 4 > ti - 

• • I «O 

TexLBoxl.Da taBindings.Add( "Text" , MiDataSet, "Aurores.an_fname") 
TextBox2.DataBindings.Add("Text", MiDataSet, "Autores.au_Lname") 

Las sentencias que hay al final son las que enlazan las dos cajas de texto con 
dos de las columnas de la tabla Al ejecutar el programa verá cómo aparece en 
esas cajas de texto el nombre y apellido de la primera lila recuperada. 


Asistentes y diseñadores de Visual Basic .NET 


Algunos de los beneficios de ADO.NET no los podremos apreciar si nos li¬ 
mitamos a crear los DataSet y adaptadores desde código, sin usar los asisten¬ 
tes \ diseñadores de Visual Basic .NET. Utilizando esta herramienta, cada vez 
que se seleccione en el diseñador de datos un origen, como puede ser la tabla 
de autores, se generarán automáticamente todas las clases necesarias para que 
podamos hacer referencia directa a tablas y columnas como si fuesen objetos. 



En ejemplos previos hemos utilizado la sintaxis Tables( "Autores") para 
referirnos a una determinada tabla, o Columns ( " title") para poder acce¬ 
der a una cierta columna. Usando las clases generadas por Visual Basic .NET 
esas mismas referencias quedarían como Autores y title, sin necesidad de 
anteponer el nombre de la colección, los corchetes o las comillas. 

Otra ventaja de utilizar estos objetos, aparte de la notación más clara, es que 
la tecnología ¡ntcliisense de Visual Basic .NET podrá ser mucho más útil, por 
ejemplo mostrando todas las columnas al referirse a una tabla o todas las pro¬ 
piedades de una determinada columna. 

Creación automática de objetos 

Encontraremos en Visual Basic .NET diferentes métodos para conseguir la 
creación automática de objetos como los usados en ejemplos previos para la co¬ 
nexión, recuperación y acceso a los datos. Uno de los más directos y fáciles con¬ 
siste en usar el Examinador de servidores. 

Usando la rama Conexiones de datos de esa ventana (véase figura 21.9) es 
posible acceder a cualquier conexión que haya definida. Use el menú emergen¬ 
te de dicha rama, concretamente la opción Agregar conexión, para definir nue¬ 
vas conexiones. Como se aprecia en la figura 21.9, podemos acceder a las tablas, 
vistas, procedimientos almacenados y diagramas que hay en la base de datos. 
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Figura 21.9. Exploramos la conexión con un servidor 


Tomando un elemento, como puede ser una tabla o un conjunto de colum¬ 
nas, y arrastrándolo sobre el diseñador, por ejemplo en un formulario Windows, 
verá cómo se añaden dos elementos no visuales: un SqlConnection y un 






Sq lDataAdapter Nos ahorramos, por tanto, el código de conexión v recupe¬ 
ración de un conjunto de datos que usamos en todos los ejemplos precedentes. 

Selecciona ruto cualquiera de los elementos recien añadidos, podremos acce¬ 
der a sus propiedades en la ventana Propiedades. De esta manera podríamos, 
por ejemplo, alterar la conexión a la base de ciatos o modificar la sentencia de 
selección. 

Una alternativa, si deseamos configurar los componentes de conexión y re¬ 
cuperación de datos de forma manual, consiste en lomarlos de la página Datos 
del Cuadro de herramientas, mostrada en la figura 21.10, e insertarlos en el di 
senador, procediendo como con cualquier otro componente. 
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Figura 21.10. Componentes relacionados con el acceso a datos 


Sirviéndonos de las opciones del menú emergente del adaptador de datos, en 
este caso concreto el componente sqlDataAdapter 1 que aparece en la parte 
interior del diseñador, podemos abrir una ventana para configurarlo, acceder 
a una vista previa de los datos o generar el correspondiente conjunto de datos o 
DataSet. Gracias a la vista previa podemos conocer anticipadamente la infor¬ 
mación sobre la que trabajaremos. F.n la ventana, similar a la de la figura 21.11. 
aparece en la parte superior una lista de los adaptadores disponibles. Seleccio¬ 
nando uno de ellos y pulsando el botón Llenar conjunto de datos veremos las 
filas v columnas en la parte interior 

Usando la opción Generar conjunto de datos del citado menú abriremos un 
asistente, compuesto sólo de una simple ventana, que nos permitirá generar el 
componente DataSet necesario para trabajar con los datos. I a disponibilidad 
de este elemento durante la fase de diseño aporta bastantes ventajas. Para em¬ 
pezar, la propiedad DataBindings de cualquier componente despliega, en la 
ventana Propiedades, una lista de los elementos de base de datos existentes. De 
esta forma, podemos establecer el enlace adecuado sin necesidad de escribir 
código alguno, tan solo eligiendo un elemento de una lista tal v como se mues¬ 
tra en la figura 21.12. Lo mismo es cierto para las propiedades DataSource y 




DataMember de otros componentes, como DataGrid, habilitando incluso la 
configuración de las columnas en fase de diseño. 



Figura 21.11. Vista preliminar de la información de un adaptador 



















































Oirá ventaja considerable es la posibilidad de acceder a los datos, desde el 
código del programa, sin necesidad de usar propiedades como Tables oRows, 
va que el asistente que crea el DataSet realmente define un derivado en el que 
existen propiedades que representan a las tablas y columnas con tipos específi¬ 
cos, facilitando la edición y asegurando la ausencia de errores de tipo. I.n l.i lí¬ 
gula 21.13, por ejemplo, puede ver que el DataSet generado por el asistente 
cuenta con una propiedad, llamada authors, que representa a la tabla de auto¬ 
res. Este objeto, t i su vez, dispone de una serie de propiedades que representan 
a las columnas de la mencionada tabla. 



Figura 21.13. El conjunto de datos generado dispone de propiedades 
específicas para acceder a las tablas y columnas 


Como puede ver, gracias a los elementos existentes en Visual Basic .NF.T po¬ 
demos incluso crear los mismos programas anteriores, de visualización de los 
dalos de una tabla, sin necesidad prácticamente de escribir código. 

El asistente para formularios de datos 

Para crear un formulario de acceso a datos, ya sea basado en un DataGrid 
o en conjuntos independientes para la edición, podemos usar el asistente espe¬ 
dí ico que existe con este fin. M se ocupara de añadir un formulario al proyecto 
e incluir en él lodos los elementos necesarios, sin necesidad de con!¡guiarlos 
manualmente. Los pasos a dar son los descritos a continuación. 

Añadimos un nuevo elemento al provecto actual, seleccionando de la lista 
Plantillas (véase figura 21.14) el elemento Asistente para formularios de datos. 





En la parte interior podemos modificar el nombre establecido por defecto para 
este nuevo formulario. Aparecerá la primera página del asistente, tan sólo in¬ 
formativa, en la cual pulsaremos el botón Siguiente. 



Figura 21.14. Iniciamos el asistente para crear nuestro formulario de datos 


I I asistente precisa un conjunto de datos sobre el que trabajar, conjunto de 
datos que podría existir va. si hubiésemos insertado o creado previamente un 
DataSet, o bien puede ser creado en ese momento. Es la opción por la que se 
ha optado en la figura 21.15, introduciendo el nombre que va a dársele al nue¬ 
vo conjunto de datos. 



Figura 21.15. Creamos un nuevo conjunto de datos 

La siguiente pagina del asistente, que puedo ver en la figura 21. lh. sólo apa¬ 
recí’ en caso de que hayamos elegido la creación de un nuevo DataSet. Como 
puede verse, debemos elegir los elementos que lormaran parle de ese conjunto 






de datos, seleccionando tablas o vistas y añadiéndolas a la lista de la derecha. 
De manera análoga, en Ja página siguiente elegiríamos las columnas que forma¬ 
rían parte del conjunto de datos. 



Figura 21.16. Seleccionamos los elementos que formarán parle del conjunto 
de datos 

Finalmente, como último paso del asistente, indicaremos si deseamos mos¬ 
trar todos los datos en una cuadricula o rejilla, utilizando un DataGr id, o bien 
usar controles independientes para editar cada columna de una tila cada vez 
Si elegimos esta opción, que es lo que lia hecho en la figura 21.17, serán accesi¬ 
bles las opciones Agregar, Eliminar, Cancelar y Controles de exploración que 
aparecen deba|o. Con ellas podremos configurar el formulario según nos intere¬ 
se, añadiendo elementos para la edición v la navegación por los datos. 



Figura 21.17. Configuramos la apariencia y funciones del formulario 
de datos 





Asumiendo que ha seguido los pasos descritos y seleccionado la misma la¬ 
bia. columnas v opciones, al finalizar tendrá en su provecto un formulario simi- 
laral déla figura 21.18. mediante el cual podremos efectuar cualquier operación 
de edición sobre la tabla. 



Figura 21.18. Formulario generado por el asistente 

No hemos escrito una sola línea de código pero, si examina el modulo co¬ 
rrespondiente al formulario de datos, el asistente ha generado bastantes proce¬ 
dimientos Su estudio puede aclararle muchos detalles sobre objetos y métodos 
de trabajo con datos. 


Puntos clave 


• IVira acceder a bases de datos desde Visual Basic .NI I utilizaremos los 
servicios de ADO.NET, una evolución de ADO con un modelo de objetos 
simplificado. 

• Actualmente existen adaptadores para conectar directamente con SQI 
Server v con cualquier controlador OLE DB, encontrándose en desarrollo 
el que permitirá utilizar ODBC. 

• La clase fundamental del nuevo modelo es DataSet. mediante la cual 
podemos recuperar y manipular la inlormación. 

• Los objetos que alojan los datos pueden conectarse con controles de in¬ 
terfaz, facilitando la visualización automática de la información 

• Mediante la colección DataBindings con que cuentan algunos controles 
es posible enlazar cualquier propiedad de un objeto con otra de un se¬ 
gundo objeto. 

• Utilizando el Explorador de servidores, mediante operaciones de arras 
liar v soltar, no es necesario definir mediante código las conexiones a ba¬ 
ses de dalos, comandos v conjuntos de datos. 



Resumen 


Este capítulo nos ha servido para familiarizarnos con el nuevo mecanismo 
de acceso a datos que acompañará a la plataforma .NET: ADO.NET. Se trata 
de una evolución de ADO que incorpora notables mejoras, al tiempo que sim¬ 
plifica el trabajo con datos desde cualquiera de los lenguajes existentes para la 
plataforma. 

Existen muchas posibilidades adicionales que ni siquiera se han menciona¬ 
do en este capítulo, como por ejemplo la capacidad para trabajar con XML o el 
uso de transacciones, la creación de modelos de datos mediante las herramien¬ 
tas incorporadas en la edición b'.ntcvpnsc Architcct de Visual Studio .NET, etc. 
Lo visto, no obstante, es un buen punto de partida si queremos profundizar en 
el funcionamiento y uso de ADO.NET y los elementos que Visual Basic .NET’ 
incorpora para ello. 






I’n ol decimocuarto capítulo se mostró romo diseñar, prácticamente de for¬ 
ma manual, un documento para imprimirlo o visualizarlo previa monte. I >ia 
tarea es factible omindo dicho documento os rolalñ ámenlo simple, pero resul¬ 
ta ardua a medida que se va ganando en complejidad, especialmente si el in 
1 orino se compone de información obtenida a partir Jo bases di* datos, con las 
cuales hay que conn lar v comnnii arse según <*l proceso descrito en el capitulo 
p revio 

I .1 alternativa, para simplificar eso trabajo, es usar una herramienta especi¬ 
fica que facilite el diseño v configuración visual de los informes. Actualmente 
la única integrada en Visual Basic.NI I es C rvslal Koports .NI* I', la cual acompa- 
ña a algunas ediciones del producto de Mu rosoli. I s de suponer que también 
podra adquirirse separadamente. 

< i raí ias .1 i rystal Keporls Nll podemos no solo impi imir los ¡nlormes, si¬ 
no también publicarlos digil.límente en diversos torréalos: I 11 MI . KM l*PI 










etc., y exponerlos como servicios Web para que cualquier cliente pueda utili¬ 
zarlos. De esta forma es más fácil la transferencia de los documentos a través de 
redes empresariales o Internet, en contraposición a las dificultades que plantea 
el envío de un medio físico como es el papel. 


El diseñador de informes 


Crystal Reports .NET se integra en el entorno de Visual Studio .NET apor¬ 
tando un asistente y un diseñador visual, así como una colección de objetos 
que pueden utilizarse para modelar los informes. La información mostrada en 
éste, los datos propiamente dichos, generalmente se recuperan de una base de 
datos, aunque en realidad puede actuar como origen cualquier DataSet inde¬ 
pendientemente de donde provenga su contenido. 

Una vez diseñado el informe, podemos imprimirlo directamente, visualizarlo 
en el interior de un formulario Windows u ofrecerlo en una página web me¬ 
diante ASP.NET. También existe la posibilidad de ofrecer el informe como si 
fuese un servicio web. En los puntos siguientes nos vamos a familiarizar con 
Crystal Reports .NFT diseñando un informe simple. 


Creación de I informe 


Asumiendo que tenemos un proyecto al que deseamos añadir un informe, 
recurriríamos a la ventana Agregar nuevo elemento (véase figura 22.1) que he¬ 
mos utilizado en algún caso previo para añadir formularios y otros elementos. 
En este caso concreto elegiríamos de la lista de la derecha el elemento Crystal 
Report, introduciendo en la parte inferior el nombre que deseamos dar al archi¬ 
vo donde sera almacenado. 
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Figura 22.1. Añadimos un informe Crystal Report al proyecto actual 






leñemos tres posibilidades a la hora de crear el inlornuv ulih/ar un asisten- 
le que nos guie paso a paso en el proceso, partir de un inlorme en blanco \ aña¬ 
dir a continuación manualmente los elementos que se precisen o bien partir de 
un inlorme previo. Asumiendo que es la primera ve/ que creamos un inlorme 
C rvstal Keports en Visual Basic .Nb' I. elegiríamos la primera de las opciones 
disponibles. 

Utilizando el asistente, como se ha hecho en la figura 22.2. en la parte inte¬ 
rior podremos elegir entre varios modelos distintos de informes predefinidos. 
Puede elegir cualquiera de ellos v ver en el dibujo de la derecha cual seria su 
apariencia. Despees de seleccionar el que mas se ajuste a nuestras necesidades, 
no tenemos mas que pulsar ahora el bolón Aceptar para poner el asistente en 
man ha. 



Figura 22.2. Elegimos el tipo de informe a crear 

I I asistente para la creación de informes dispone, como se aprecia en la li 
gura 22.4, de múltiples paginas, parle de las cuales están dedicadas a la se lee 
cion del origen de los datos que van a utilizarse, eligiendo los campos o columnas 
de tablas \ estableciendo grupos y (ótales 

I n l.i mencionada figura, por ejemplo, puede observar como se ha conecta¬ 
do con un servidor SQL Server, llamado INSPIRON, \ se ha tomado de él la ta 
bla authors de la base de datos pubs. 

Algunas de las páginas del asistente serán exclusivas del tipo de informe se¬ 
leccionado. I .n la figura 22.4, por ejemplo, puede ver la pagina para un inlorme 
ile hpo carta. I n dicha pagina, en la parte superior, existe una lista desplegable 
para seleccionar la sección del inlorme que va a diseñar encabe/ado de infor¬ 
me. encabezado de pagina o detalle. 

!\>r cada una de estas secciones tenemos, en la parte interior, un a rea para 
insertar cualquier texto, texto en el que pueden utilizarse elementos de la bást¬ 
ele datos tomándolos de la lisia que hnv encuna y arrastrándolos hasta donde 
se deseen incluir. 
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Figura 22.3. Seleccionamos el origen de los datos para el informe 



Figura 22.4. Diseño de la secciones de un informe tipo carta 

Modificación de I diseño 


Al cerrar el asistente veremos aparecer el informe en su diseñador, inclu¬ 
yendo en algunas secciones los elementos introducidos por el propio asislente. 
campos de datos en la sección de detalle, titulo en el encabezado, etc Al típico 
Cuadro de herramientas, en cuyo interior encontramos etiquetas de texto, lineas 
v recuadros, se añade ahora otra ventana: el Explorador de campos Puede ver¬ 
lo en la parte inferior izquierda de la imagen que aparece en la figura 22. r >. 

Gracias a los elementos existentes en el Explorador de campos podrá in¬ 
cluir, en cualquier sección del inlorme, datos obtenidos del origen previamen- 






te seleccionado, por regid general tina base de datos, asi corno fórmulas, el nu¬ 
mero de pagina, la fecha de impresión o de confección del informe, etc. 



Figura 22.5. El diseñador de informes Cryslal Reports 


Usando el menú emergonle del diseñador, previa colocación del puntero 
del ratón sobre el lugar en que quiere trabajarse, tendremos at ieso a opciones 
para insertar secciones, subtotales, datos v otros asistentes que simplifican la 
mayoría de las tareas de diseño. No necesitamos, por tanto, recurrir a ninguna 
herramienta externa. 

I n principio la sección de encabezado del informe esta inactiva. I I sombrea¬ 
do que aparece en su interior indica que no sera impresa. Seleccione dicha sec¬ 
ción, simplemente pulsando en la zona gris donde pone Encabezado del informe 
(Sectionl). v después recurra a la ventana Propiedades para modificar la pro¬ 
piedad Supress dándole el valor False. A continuación tome del Cuadro de 
herramientas un Objeto de texto e insértelo en la sección recien acto ada I laga 
doble clic sobre el objeto añadido e introduzca un titulo, modificando el tipo 
de letra mediante la habitual propiedad Font. Disponiendo el puntero del ra¬ 
tón en el margen interior de la sección vera que puede modificar su altura. 

Lo siguiente sera modificar el contenido del encabezado de página, sección 
que aparece en el diseñador justo debajo de la anterior v que, en el momento 
de la generación del informe, se muestra una ve/ por pagina Actualmente en 
esa sección ha\ un elemento que muestra la techa de impresión, asi como unos 













títulos de los datos que van a imprimirse en el cuerpo. Haciendo doble clic so¬ 
bre esos títulos los modificaremos, puesto que actualmente lo que aparece es el 
nombre de las columnas en la tabla de autores. 

I ras estos cambios el informe tendrá la apariencia de la figura 22.b. Fíjese 
especialmente en las secciones donde hemos modificado algo. 



Figura 22.6. El informe tras establecer un título y modificar el encabezado 
de página 


Fórmulas y campos especiales 

Además de datos extraídos de una tabla y textos estáticos, que son los com¬ 
ponentes básicos que existen actualmente en nuestro informe, también pode¬ 
mos añadir lo que Crystal Keports .NET denomina campo* empecía les y resultados 
de fórmulas. La lista de campos especiales aparece a la izquierda, en el Explo¬ 
rador de campos. De ella podemos tomar la fecha de impresión, el número de 
páginas que tiene el informe, el nombre de su autor, el número de registro o fi¬ 
la, etc. 

Nuestro informe actualmente muestra la fecha de impresión en la parte su¬ 
perior, en el encabezado de pagina, asi como el número de página en el pie de 
página. Puedo alterar tanto la disposición de estos elementos como añadir otros 
nuevos, por ejemplo mostrando el numero total de paginas que van a impri¬ 


mirse. 



La rama Campos de fórmula aparece inicialmente vacía, ya que no existo 
ninguna formula definida en este momento. Suponga que desea añadir al final 
del informe, en la sección pie del informe que actualmente esta desactivada, el 
número total de autores que hay en la editorial. Con este fin podríamos servir¬ 
nos de una fórmula muy simple: contar el número de lilas obtenidas a partir de 
la consulta. Los pasos a dar serian los descritos a continuación: 

• Pulsamos con el botón secundario del ratón sobre el grupo Campos de 
fórmula y seleccionamos la opción Nuevo. Introducimos el nombro del 
nuevo campo, por ejemplo NumeroAutores. 

• En la ventana que aparece, similar a la de la figura 22.7, seleccionamos de 
la lista central la función Count < Campo ), simplemente haciendo doble 
clic sobre ella. 

• A continuación hacemos doble clic sobre cualquiera de los campos del in¬ 
forme que aparecen en la lista de la izquierda. Cerramos entonces el edi¬ 
tor de fórmulas. 

• Tomamos el campo NumeroAutores y lo arrastramos hasta la sección de 
pie de informe que, previamente, habremos activado como antes hicimos 
con el encabezado de informe. 



Figura 22.7. El editor de formulas de Crystal Reports 


Amplíe la sección del pie de informe e incluya un elemento de separación, 
por ejemplo una línea usando el elemento Objeto de línea que aparece en el Cua¬ 
dro de herramientas. También puede añadir un texto juste) detrás del campo de 



fórmula que ha creado indicando dicho número, en este caso autores. En la li- 
gura 22.8 aparece el informe tras los últimos cambios. Observe en el margen in¬ 
terior izquierdo el campo de fórmula que hemos creado y que esta disponible 
para inserción en cualquier punto. 



Figura 22.8. El informe tras modificar el pie incluyendo el número 
de autores 


Formato de loo elementos 

I .os elementos que leñemos actualmente en el inlorme, tanto los dispuestos 
por el asistente que lu generó como los añadidos posteriormente por nosotros, 
tienen lo que podríamos denominar un formato por delecto. Ya sabemos que 
mediante la ventana Propiedades podemos, por ejemplo, alterar el tipo de le¬ 
tra o el color. 

Resulta mucho más cómodo edilai el formato de cualquier objeto mediante 
la ventana Editor de formato. I I acceso a esta lo da la opción Formato del menú 
emergente asociado al objeto en cuestión Desde esa ventana, según se \ r en la 
ligur.i 22». es posible seleccionar el tipo de letra, asociar bordes v sombras, un 
h'ipervinculo, rolar el texto, etc. No tenemos mas que elegir las opciones que 
deseemos v, al cerrar la ventana, serán entonces aplicadas al elemento corres¬ 
pondiente. 






Figura 22.9. La ventana de edición de formato 

Explotación del informe 

í n los punios anteriores nos hornos centrado on ol dísono dol informe, cono- 
c iondo algunas do las posibilidades que aporta ol diseñador do C rvstal Reports. 
[•so diseño, lógicamente, servirá para generar el informo propiamente dicho c|ue 
os lo que nos inleresa. F.l informe si 1 almacena en un archivo con extensión RPI, 
archivo desde el cual puede lomarse cuando on una aplicación interese usarlo. 

Como se indicaba antes, un informe puede ser impreso directamente, mostra¬ 
do en un formulario Windows o en un formulario Web. Fstas son algunas de* 
las posibilidades que vamos a verde inmediato. 

Visualización en un formulario Windows 

Una ve/ diseñado el informe, podemos ofrecer una visuali/ación previa eñ 
un formulario, vista previa desde la cual el usuario pueda lanío imprimirlo c o¬ 
mo exportarlo a diversos formato*. Para ello basta con insertaren un formula¬ 
rio un componenteCrysta 1 ReportViewer \ enlazarlo con el informe mediante 
la propiedad ReportSource. I os elemenfos que aparecerán en la ventana de 
vistiali/ación previa pueden controlarse medíanle las propiedades Display- 
Toolba r. D i sp 1 ayGroupTree. ShowExportBu t ton. ShowCloseBu t ton, ele 

Asumiendo que ha iniciado una nueva aplicación Windows, inserir en el 
lomiulario un control Crys ta 1 ReportViewer v modifique la propiedad Re¬ 
portSource. localizando el archivo RPT en e! que habíamos almacenado el 
informe. I I «ispéelo del control, en la lase de diseño, sera el mostrado en la li 
gura 22 . MI I lemos dado el valor False a las propiedades D i sp layToolBar v 




DisplayGroupTree, de tal forma que en control aparezca tan sólo la vista 
previa del informe, sin permitir operaciones adicionales. 



Figura 22.10. El control de vista previa en el interior del formulario 


Nota 

Si al modificar la propiedadReportSource del controlCrystalReport- 
viewer ve aparecer una lista tan pequeña que sólo muestra un elemento 
con el título (Nuevo), pulse la flecha de desplazamiento hacia abajo que 
aparece a la derecha, en el interior de la misma lista, para poder elegir el 
elemento Examinar y así recuperar el informe del archivo rpt. 

Modifique la propiedad Dock del CrystalRepor tviewer para que ocupe 
todo el área disponible en la ventana. No necesita hacer nada más, puede eje¬ 
cutar el programa para ver el informe resultante que, siguiendo los pasos descri¬ 
tos, debería ser similar al mostrado en la figura 22.1 I 

Visualización en un formulario Web 

Conociendo los pasos que hemos dado para mostrar el informe en un formu¬ 
lario de Windows, no nos costará demasiado hacer lo mismo en un tormulario 






Web. También contamos en este caso con un control Crys talReportViewer, 
si bien especiiico para ser incluido en formularios Web. La única diferencia es 
que en la fase de diseño la propiedad ReportSource no aparece en la ventana 

in- 


sdades, por 

lo que 

d ebe re ni os rec u r r i r a o t r o 

método para acceder 

. Usaremos 

el mismo que 

habíamos diseñado 

en un punto anterior. 

•m Informe Crystal Reports 


- ~>L¿ 

¡ V 

lanRwort | 













Lista de autores existentes en la editorial 


Mi |i| ,'in; 






Apellido» 


Nombre 

Dirección 

Población 


l Juint 


1 IUH IHi> 

Aniif M 

leen 


Wuu 


Kalrn» >n 

invij Mina n i 

Uoi» r*i 


l irrrv 


Míih'ih 

MWftlnlSi *41 | 

iMllan.l 


1 anmn 


1 'll«T>l 

W |t*m m Ir. 

Mfk* 


o l V4f T 


Mt.ll.,1 

i! 1 Irulinl A* ■ H 

*4M W 


Strniglii 


llr.in 

%4J»< ••INfr A» 

Oalland 


S»Mti 


Mvnii.lrf 

IU Htwwtjft Ur 

l4»nMr 


Manuel 


Ah.ithi.tti 

1*22 \ lUtcrrun m 

i«ián 


UpM 


A Mil 

MIHHIniuIr V 

l'ufci All» 


uii.icle»». 


Mwrt 

i*cj iu.» w: 

Canelo 


1 <üt vlk S 


1 h-ute*« 

IR lliitn.l.% *v A* 

\m haacwca 


lirefw 


MmwiinMr 

12 lltw* Nil 

Noalivttb 


Mlttnliet Hall* 


MrytMkl 

SS lliiiwblc III 

1 wt allí. 


1 náinniilii 


«Mu 

1 Mi. ir n 

W nina* 1 Inct 


Jc“ J'llll.i 


Inrrr» 

i: •ux.'n.m ri w» 

Aon Artww 


rkl raixn 



i n.ijitip n 

dúo 


Snl**»- 


r»«i 

♦4Jo 1.U-rjph A* 

• MImuI 


Mav 1 emitir 


Htcurnt 

U 1 plaiul II». 

i lailán0 


ICitrwn 


l.nn 

OJO Mi-Auln M 

IMImI 


Kiuitlf» 


j)ll«U 

IV'i* Ail.nrt.-n fl 

*uc*»tlli 


Ilion e» 


Alien 1 

MiatiloiU.- V 

Mu Alt.. 


ÚriUUen 


1 Matltvt 

lül fWi*ni 

Vwinlle 


Mingvt 


Anuí 

Ul Srinii« \t 

«Uli 1 ai., C* r 


Muiff» 


Aihen 

U* V»«tU A» 

yiUirni 






JA Auitvtn 


i 




M 1 

... „ > 

tirwr. «cluaJ cm página t 


limrc 

i«al o* páflwrf» 1 fj 

K*»d» aeeat 100% 


Figura 22.11. Aspecto del informe mostrándose en un formulario Windows 


I ras iniciar una nueva aplicación ASP.NET. insertamos en el formulario un 
componente Crys talReportViewer colocándolo aproximadamente en la es¬ 
quina superior izquierda. I lacemos doble clic sobre el fondo del formulario, 
para abrir el método asociado al evento Load, e introducimos luego el siguien¬ 
te código: 


CrystalReporLViewer1.ReportSource = _ 

"F:\Mis1nformes\ListaAutores.rpt" 

Lógicamente, tendrá que modificar el camino para hacer referencia a la car¬ 
peta en la que esté almacenado el archivo ListaAutores . rpt conteniendo el 
informe. Puede insertar, si lo desea, otros elementos en el formulario delante o 
detrás del informe. Sólo con ese componente, no obstante, va obtendría el re¬ 
sultado que aparece en la figura 22.12. El cliente no solo ve el informe sino que 
puede paginarlo, etecluar búsquedas o modificar el tactor de magnificación. 
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Figura 22.12. El informe mostrado en Internet Explorer 


Si desea tener una vista previa del informe durante la fase de diseño, que le 
permita ajustar algunas propiedades del CrystalReportViewer, tendrá que 
modificar la propiedad DataBind ings. Esta da paso a una ventana como la 
de la ligura 22.13, en la que podemos elegir de la izquierda la propiedad que 
deseamos enlazar, indicando a la derecha la expresión de enlace que, en este ca¬ 
so concreto, será el camino donde se encuentra el informe. I lecho este cambio, 
ahora podra ver en el diseñador (véase figura 22.14) cómo quedaría el informe 
realmente aunque, como se aprecia en la parte central, con unos datos ficticios. 

Impres ión y exportación del informe 

Mostrar el informe visualmente al cliente, va sea en un formulario Windows 
o en una página web, puede no ser siempre lo apropiado, bn ciertos casos nos 
interesará simplemente imprimir el informe, o bien guardarlo en un archivo 
con un cierto formato. No necesitamos usar un control CrystalReportViewer 
para realizar estas operaciones. 







Figura 22.13. Modificamos la propiedad DataBindings asociando 
ReportSource con el camino donde se encuentra el informe 



Figura 22.14. Aspecto del informe durante la fase de diseño 


Al diseñar un informe estamos creando también una clase. Ésta tendrá por 
nombre el mismo asignado al informe y, por supuesto, podemos utilizarla para 








crear objetos que representan al informe. En la clase encontrarnos dos métodos 
especialmente interesantes: PrintToPr Ínter ( ) y Export( ). Como puede 
suponer, utilizaremos el primero para enviar el informe a la impresora y el se¬ 
gundo para exportarlo a un archivo. 

II método PrintToPr Ínter ( ) precisa cuatro parámetros: un entero indi¬ 
cando el numero de copias a imprimir, un Bolean indicando si se desean o no 
las copias en secuencia y dos enteros seleccionando las páginas a imprimir. Si 
estos dos últimos parámetros son cero se entiende que debe imprimirse el intor¬ 
mo completo. Antes de llamar a PrintToPrinter ( ) podemos usar la propie 
dad PrintOptions para establecer los parámetros vio impresión, por ejemplo 
seleccionando la orientación del papel, los márgenes, 1.» impresora, etc. 

I n cuanto al método Export( ), no es necesario parámetro alguno va que 
se asume que. previamente, se habrá utilizado la propiedad ExportOptions 
para configurarlos adecuadamente. Dicha propiedad es un objeto que cuenta 
con otras propiedades y nos interesarán, principalmente, las que determinan el 
formato en el que va a exportarse y el destino do la exportación. Mediante Ex- 
portForma tType elegiremos el formato asignando una de las i mistantes enu 
moradas en la tabla 22.1. Las opciones, como puede ver, cubren los casos mas 
habituales. 

A continuación asignaremos a la propiedad ExportDestinationType el 
valor DiskFile, facilitando en Destinat ionOptions la referencia a un ob¬ 
jeto Di skFileDestinationOpt ions que contendrá en su única propiedad 
el camino v nombre del archivo. 


Nota 

También existe la posibilidad de exportar un informe enviándolo a una di¬ 
rección de correo electrónico o una carpeta de Microsoft Exchange. 


Tabla 22.1. Formatos de exportación posibles 


Constante 


Tipo del documento 


Exce 1 
HTML 3 2 
HTML40 


Hoja de cálculo de Microsoft Excel 

Pagina HTML ajustada a la especificación 3.2 

Página HTML ajustada a la especificación 4 0 


Po r tab 1 eDocForma t PDF 

RichText RTF 


WordForWindows 


Documento de Microsoft Word 


Suponiendo que deseásemos Ln ilil.ir mu opción para exportar el documen¬ 
to en formato PDI, facilitando asi una distribución digital no editable, podría¬ 
mos disponer un bolón en el lormularin v asociar el código siguiente al evento 
tle pulsación: 





Dim Milnforme As New ListaAutores{) 


Dim Opciones As New DiskFi1eDestinationOptions{) 


ii-.i •« • . -i» a *. -m .. i. . t . • i»-» 

Milnforme.ExportOptions.ExportFormatType * 
KxportFormatType.PortableDocFormat 

Mi Informe.ExporLOptions.ExportDestinatíonType = 

ExportDestinationType.DiskFile 

Opciones.DiskFileName "C:\MiInforme.pdf” 

MiTnforme.ExportOplions.DestinationOptions = Opciones 


Milnforme.Export() 


MessageBox.Show("Informe exportado") 


l*n la figura 22.15 so puedo ver el mismo informe pero abierto con Acrobat 
Mder, la utilidad habitual para leer archivos PDF en Windows. 

















Puntos clavo 


• Crystal Reports .NFT es una herramienta inlograda on el onlorno do Visual 
Studio .NF.T, aportando un diseñador visual para componer los inlormes 
v un asistente que los genera a parí ir de plantillas pred ¡soñadas. 

• Usando los objetos de Crystal Reports es posible añadir diversos elemen¬ 
tos a un informe, desde texto estático hasta campos especiales y fórmulas. 

• Mediante el componente CrystalReportViewer es posible facilitar 
una vista previa en pantalla de un informe, tanto en formularios Windows 
como en formularios Web. 

• F! informe genera una clase de componente que podemos usar para crear¬ 
lo directamente e imprimirlo o exportarlo sin una visuali/.acion previa. 


Resumen 


Como ha quedado patente en este capitulo, Crystal Reports .NE1 es una he¬ 
rramienta magnifica para el diseño v explotación de informes, una herramienta 
que puede ahorrarnos muchas horas de trabajo respecto a la publicación me¬ 
diante el uso directo de la impresora, como se explicó en un capítulo previo. L1 
diseño se efectúa completamente de forma visual, partiendo primero de un asis¬ 
tente que introduce la mayoría de los elementos y, posteriormente, arrastran¬ 
do nuevos objetos y editando propiedades. 

Teniendo un informe diseñado podemos tanto imprimirlo como visualizarlo 
en un formulario Windows o en una página Web, asi como exportarlo a diver¬ 
sos formatos de archivo. Para obtener la misma funcionalidad sin esta herra¬ 
mienta sería necesario invertir muchas horas de trabajo. 
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Nuestro objetivo, en este capítulo, es aprender a recuperar esa meta infor¬ 
mación durante la ejecución de un programa. La mayoría de los programas no 
necesitan dicha información, pero puede ser muy útil en ciertos casos, espe¬ 
cialmente cuando una aplicación va a operar sobre elementos cuyas caracterís¬ 
ticas desconoce de antemano. El diseñador de formularios Windows, por poner 
un ejemplo que va conocemos suficientemente, no tiene posibilidad alguna de 
conocer las propiedades y eventos de todos los componentes que pudieran de¬ 
sarrollarse V, en la práctica, no lo necesita, puesto que puede obtener esa infor¬ 
mación cuando la necesita. Eso es lo que nos interesa saber a nosotros, como 
obtenerla cuando sea precisa. 


Servicios de reflexión 


A la hora de obtener información sobre tipos en ejecución nos tendremos 
que servir do los servicios de reflexión de la plataforma NET, cuyas clases en¬ 
contraremos en el ámbito System. Ref lection. En este ámbito encontramos 
clases que podríamos denominar de primer nivel, como Module o Assembly, 
y otras cuya finalidad es ofrecer información sobre un determinado elemento, 
como Memberlnfo, Parameter In f o o Eventlnfo. Otra dase fundamental 
en este contexto, aunque se encuentra en el ámbito System al ser básica para la 
plataforma, es Type 

Ya sabemos que todos los objetos con los que tratamos en Visual Basic NIT 
están, directa o indirectamente, derivados de System.Object, incluso los ti 
pos de datos que almacenan un valor y no una referencia. La dase Object dis¬ 
pone, entre otros, de un método llamado GetType( ) que devuelve un objeto 
Type con información sobre el objeto en cuestión. Asi, es fácil recuperar infor¬ 
mación a partir de una variable o una propiedad, por ejemplo 

Vamos a comenzar, no obstante, en un nivel bastante más alto que el de las 
variables o propiedades que pueda contener un objeto, concretamente al nivel 
de los ensamblados y los módulos que los componen. Después iremos descen¬ 
diendo rama a rama hasta llegar al detalle máximo como puede ser la lista de 
parámetros de un método. 

Aunque en este capitulo vamos a ocuparnos principalmente de los servicios 
que nos permiten recuperar información sobre los tipos, usando ciertos servi¬ 
rlos del ámbito System. Ref lection podemos también crear esa informa¬ 
ción Son los servicios utilizados por los compiladores v otras herramientas. 


Ensamblados y módulos 


C ada vez que compilamos un provecto en Visual Basic .NK I estamos gene- 
rancio un ensamblado, generalmente compuesto de* un solo módulo que puede 
ser un ejecutable o una biblioteca. Las propiedades de ese ensamblado, y las 
acciones qué pueden efectuarse sobre él, están representadas por un objeto de 



la clase Assembly. alojada en el ámbito System. Reí lee t ion Normalmente 
obtendremos un objeto deesa dase medíanle dos mecanismos distintos el mé¬ 
todo compartido GetExecutingAssembly ( ), que nos entrega el objeto que 
representa al ensamblado en el que se encuentra el código que está ejecutándo¬ 
se, o bien los métodos Load( ) y LoadFrom( ), también compartidos, que nos 
permiten abrir cualquier ensamblado obteniendo un objeto Assembly con su 
información. 


Nota 

La palabraAssembly es una palabra clave en Visual Basic .NET y. por tan¬ 
to, entra en conflicto con la claseAssembly. Para evitar problemas deberá 
hacer referencia al tipo incluyéndolo entre corchetes: [Assembly j. 


Disponiendo de un objeto Assembly, recuperado con cualquiera de los mé¬ 
todos anteriores, podemos obtener información diversa acerca de él leyendo 
ciertas propiedades, también podemos enumerar todos los módulos que lo 
componen, como veremos de inmediato. 

Información sobre el ensamblado 

IJn ensamblado tiene un nombre, una localización tísica, un punto de entra¬ 
da. etc I odos éstos son dalos que podemos recuperar str\ ¡endonos de las pro 
piedades de la clase Assembly. Para verlo en la practica nos serviremos de 
una sencilla aplicación de consola en la que incluiremos el uuligo siguiente: 


Imports System.Reflection 

Module Moduiel 
Sub Main () 


Dim EsteEnsamblado As |Assembly| - 
| AssembI y|.GrttxecutingAssemb1 y 


Consolé.WtiteLine("Nombre del ensamblado: <0}”, 

Fst.eFnsambl ado . Fu l i Ñame ) 

Consolé•■Wr i teLine( ) 

Consolé. Wrii:eLine( "Localización física: (0}“, 
fc:s t elinsamb lado. Local ion) 

Console.WriteLine(] 

Consol e . Wr i LeLi ne ("CodeBase: { 0 ) ” , Es veF.rtsainb I a do . CodeBase ) 
Consolé. WriteLi rte( ) 

Consolé . Wr i teLine ( " Es t. a en la cache de ensamblados: { 0 } H , 

Es I eFnsu roblado. (¡ loba l Assemb I yCache ) 
consolé.Wi itel.,ine() 

Consq le . Wr i t.eli fie( " Ent ryPoint: (0)", Est eEnsambl ado. Rnt ryPo i nt i 





I ras obtener una referencia al objeto Assemblv que représenla al ensam¬ 
blado afilia!, el que contieno el código que está ejecutándose, usamos las pro¬ 
piedades FullName. Location. CodeBase. G1oba1AssemblyCache \ 
EntryPoi nt para recuperar el nombre del ensamblado, su locali/aiión física, 
saber si está o no en la cache global de ensamblados del sistema v conocer el 
punió de entrada que se ejecuta al iniciar el ensamblado. I I resultado obleni 
do, al ejecutar este programa, sera similar al de la figura 2 el I n ella puede 
ver que el nombre completo influye la versión del ensamblado, asi como que 
este no se encuenlra en la GAC {Globnl A^t'tnbl 1 / ( th'li*') v que el punto de entra 
da es el método Ma in ( ). 
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Figura 23.1. Información sobre el ensamblado que contiene 
el propio ejemplo 

Si en lugar de sobre el ensamblado que contiene el ejemplo desea informa¬ 
ción sobre otro cualquiera, no tiene más que añadii la linea siguiente antes de 
comen/ar la recuperación de dalos 

tsteFnsamb 1 ado | Assemh 1 y J . Load ( "Sy a t»*m . W i ndows . Forros ” ) 

I n este caso se res opera el ensamblado System . Windows . Forms, pero de 
manera análoga podría accederá cualquier otro va sea de la plataforma . NI 1 o 
de terceros. U resultado, como se aprecia en Io figura 23.2, es bien distinto. I s 
le ensamblado si se encuentra alojado en la CiAt v no tiene un punto de entra¬ 
da va que es una biblioteca, no ejecutable directamente. 

Módulos que componen el ensamblado 

I a clase Assembly dispone de \ arios métodos que nos permiten obtener un 
cierto modulo de los que componen el ensamblado o bien una lista di 1 todos 
ellos o todos los que en dicho momento están alojados en memoria C ada mo 
iliilo es representado mediante un objete» de la clase Module que. al igual que 
Assembl y, es una palabra reservada va que se usa para la definición de modii 
los, de aln que deba utilizarse también la notai ion especial con los corchetes. 
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Figura 23.2. Información sobre el ensamblado System.Windows.Forms 

En la dase módulo tan sólo encontramos cuatro propiedades con informa¬ 
ción sobre el módulo. Con ellas podemos conocer el nombre simple o cualifica¬ 
do, asi como obtener el Assembly al que pertenece el módulo. No necesitamos 
más para, simplemente, enumerar los módulos que tiene un ensamblado cono¬ 
ciendo su nombre. Podemos añadir las tres sentencias siguientes al final del cu- 
digo del ejemplo anterior para conseguir un resultado como el de la figura 23.3. 
En este caso el ensamblado está compuesto de un solo módulo. 


Dim UnModulo As |Module| 

For Each UnModulo In EsteEnsarablado .üetModules() 
Console.WrileLine ( UnModulo.Ñame) 

Next 
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Figura 23.3. Mostramos la lista de módulos que componen el ensamblado 

En este caso hemos utilizado el método GetModules( ) para enumerar los 
módulos del ensamblado. También podemos usar el valor devuelto como un 
arreglo, utilizando un índice numérico para acceder a cada uno de los módu¬ 
los. El primero, que tiene por índice cero, es siempre el módulo que podríamos 
considerar principal, donde se encuentra el punto de entrada. 











Tipos definidos en un ensamblado 


Un ensamblado es una unidad lógica, formada por uno o mas módulos lisí¬ 
eos, en el que viven los tipos de datos públicos definidos en éstos. Son tipos las 
clases, estructuras, enumeraciones, delegados, etc Al igual que podemos sa¬ 
ber qué módulos forman un ensamblado, también es fácil conocer la lisia de ti 
pos que hay en su interior, así como conocer los detalles de cada lipo. 

En este caso el método que nos interesa se llama GetTypesí ) v podemos 
encontrarlo tanto en la clase Assembly como en Module. En el primer caso ob¬ 
tendríamos una lista de los tipos existentes en el ensamblado, mientras que en 
el segundo la lista seria únicamente de los tipos de un cierto modulo. En nues¬ 
tro caso, tomando como base el ejemplo anterior, el resultado sería el mismo 
dado que el ensamblado se compone de un solo módulo. 

I o que devuelve el método GetTypes ( ) es un arreglo de objetos de la clase 
Type íal y como so indicó anteriormente, es posible obtener un objeto de esa 
clase con la información de cualquier variable u objeto mediante el método 
GetType( ) definido en la clase Ob ject, ascendiente común de todos los tipos 
existentes en Visual Basic .NET. 

La clase Type 

A pesar de estar definida en el ámbito System y ser una clase fundamental 
para el funcionamiento de los diseñadores y editores de Visual Basic .NET. la 
clase Type esta derivada no de Ob ject sino de Memberlnf o, una dase que si 
se aloja en el ámbito Sys tem. Reí lect i on. Mientras que Memberlnf o esta 
pensada para facilitar información de los miembros de una clase o estructura, 
Type tiene un objetivo más general v puede utilizarse tanto para obtener dalos 
de una clase como de cualquiera de sus miembros. 

Uno de los pocos miembros que Type hereda de Memberlnf o es Ñame, una 
propiedad en la que encontraremos el nombre del tipo. Generalmente el nom¬ 
bre no nos dirá mucho a menos que conozcamos el tipo de antemano, caso en el 
cual no necesitaríamos los servicios de reflexión de la plataforma NET. Me 
diante una treintena de métodos de la clase Type, todos ellos siguen la nomenda 
tura isXXXX ( ) y devuelven un valor de tipo Boolean, podremos saber si el 
elemento es una clase: IsClass ( ); una interfaz: Islnterf ace ( ); una enume¬ 
ración: IsEnum( ); tiene ámbito público: IsPublicf ); o no: IsNotPublic( ), 
es de uso final y no puede utilizarse como base: IsSealedf ). etc. Tan sólo tie¬ 
ne que consultar la documentación de referencia sobre la clase Type para co¬ 
nocer todos los métodos disponibles. 

Una vez determinada la naturaleza del tipo, podemos utilizar los métodos 
de la clase Type para recuperar una lista de sus constructores, miembros, pro¬ 
piedades, métodos, eventos, etc. I amblen podemos comprobar si eI tipo cuen¬ 
ta con un miembro en concreto. Eos métodos que nos interesan, en este caso, 
son GetMethods () , GetEventst), GetConstructors ( ) y GetProper- 
ties( ), para el primer supuesto, o FindMembers( ) en el segundo. 



La información devuelta por Unios esos métodos son objetos de clases como 
Methodlnf o, Eventlnf o, Cons tructorlnf o y Property I nf o, que se carac¬ 
terizan por contar con elementos que nos permiten determinar, por ejemplo, el 
tipo de una propiedad, la lista de parámetros de un método. Todas esas clases 
están derivadas de Memberlnfo, por lo que pueden tratarse de manera genéri¬ 
ca determinando el tipo de cada miembro mediante la propiedad MemberType 
de Memberlnfo. Esta puede tener uno de los valores que se enumeran en la ta¬ 
bla 23.1. Con un simple condicional podríamos convertir al tipo adecuado y ob¬ 
tener información especifica sobre el. 

Tabla 23.1. Valores de la enumeración MemberTypes 


Constante 

El miembro es ... 

Constructor 

Un constructor 

Even t 

Un evento 

Fie Id 

Una variable 

Method 

Un método 

Property 

Una propiedad 

NestedType 

Clase, interfaz, estructura, etc. 

Custom 

Personalizado 


En caso de que el valor de MemberType sea NestedType nos encontramos 
con la definición de un nuevo tipo. Es lo que ocurre, por ejemplo, cuando una 
clase alberga la definición de otra clase, supuesto que conocimos en los prime¬ 
ros capítulos. 


Parámetros de un método 


En caso de que tengamos información sobre un método, los métodos de ac ¬ 
ceso de una propiedad o un constructor, puede interesarnos conocer la lista de 
parámetros que necesita para ser invocado. La información de un método se de¬ 
vuelve en un objeto de clase Methodlnf o, mientras que la de un constructor 
se entrega en un objeto ConstructorInf o. Ambos están derivados de la clase 
MethodBase, de tal forma que cuentan con muchos elementos en común. 

Si lo que tenemos es una propiedad, podemos obtener el objetoMethodlnf o 
correspondiente a su método de lectura mediante GetGetMethod( ) y el de 
escritura con GetSetMethod ( ) De esta forma, nos basta con conocer uno de 
los métodos de la clase MethodBase: GetParameters ( ). Este devuelve un 
arreglo de objetos Parameterlnf o, conteniendo cada uno de ellos el nombre, 
tipo y atributos de un parámetro. 

Hay que tener cu cuenta que todas las clases mencionadas cuentan con el 
método GetType( ) y, por tanto, podemos obtener su tipo y descubrir infor¬ 
mación acerca de ellas de forma dinámica. También es importante conocer las 





relaciones entre algunas de estas clases para conocer las posibles conversiones. 
El tipo Memberlnf o, por ejemplo, es genérico v puede contener lina referencia 
a un Methodlnfo o un Propertylnf o, podiendo convertirse a dichos tipos 
mediante la función CType( ). 

Jerarquía de tipos de un ensamblado 


Como resumen de lo visto hasta ahora sobre el descubrimiento de tipos en 
ejecución, información que deberá complementar con la referencia de Visual 
Studio .NET sobre las clases mencionadas, vamos a desarrollar un sencillo pro¬ 
grama que muestre un árbol jerárquico de los tipos contenidos en un ensam¬ 
blado, enumerando también sus miembros. Nuestro objetivo será obtener un 
resultado como el de la figura 23.4, que corresponde al programa ya en funcio¬ 
namiento v mostrando el contenido del ensamblado JerarquiaTipos, Como 
se aprecia en esa figura, el ensamblado tiene tres tipos de primer nivel Días, 
Agenda y Forml, que son una enumeración, una estructura v una clase, res peí 
ticamente. Debajo podemos ver todos sus miembros v, entre paréntesis, la ca¬ 
tegoría a la que pertenece. En el caso de los métodos también se facilita la lista 
de parámetros. 

F : l componente que ocupa todo el espacio disponible en la ventana es un 
TreeView, similar al ListView que conocimos en un capitulo previo que se 
caracteriza por contar con uno o más nodos de primer nivel que pueden conte¬ 
ner a otros en su interior. Cada nodo se corresponde con un objeto TreeNode, 
clase que dispone de una propiedad, llamada Nodes, conteniendo la colección 
do nodos hijo. Existe un método Add ( ) que se encarga de añadir nuevos nodos 
v devolver una relerencia a ellos, de tal forma que es fácil construir un árbol 
como el di' la figura 23.4. 

Asumiendo que hemos iniciado una nueva aplicación basada en formula 
ríos Windows e insertado un control TreeView en su interior, modificando la 
propiedad Dock para que ocupe lodo el espacio disponible, el código que de¬ 
beríamos introducir seria el siguiente: 

Importa System.Ref1ection 


!%* «mi:. .te y 

Public Enura Dias 
Lunes 
Martes 
Miércoles 
Jueves 
Vierne9 
Sabado 
Domingo 
End Enum 


i 


I.*.4 


Public Structure Agenda 



Public Sub New{ByVa1 mIDe As Integer, 

ByVal mNombre As String, ByVal mTelefono As Stringi 
ID — mTDe 
Nombre = mNombre 
Telefono - mTelefono 
End Sub 

Public TD As Integer 
Public Nombre As String 
Public Telefono As String 
End Structure 

Public Class Forml 

Inhcrits System .W indows .Forms.Form 


Protected Overrides Sub OnLoad(ByVal e As Sys tem.EventArgs) 

Dim EsteEnsamblado As |Assembly| = _ 

I Assembly | . Load ( " Jerarquia'I'ipoa" ) 

Dim Nodo As TreeNode * _ 

TreeViewl .Nodes.Add(EsteEnsamb1 ado.Ful1Ñame) 

Dim Tipo As Type 


For Each Tipo In FTsteEnsamblado. üetTypes 
EnumetaTipos(Nodo, Tipo) 

Next 
End Sub 


Private Sub EnumeraTípos {ByVal Nodo As TreeNode, 

ByVal Tipo As Type) 

Dim Hijo As TreeNode * Nodo.Nodes.Add ( Tipo.Ñame & 
" Inherits " & Tipo.BaseType.Neme) 

EnumeraMlembros(Hijo, Tipo) 

End Sub 


M * . 

Private Sub FnumeraMiembro.s <ByVal Nodo As TreeNode, 

ByVal Tipo As Type) 

Dim Info As MemberTnfo 
Dim Hijo As TreeNode 


For Each Info In Tipo.GetMembers 

Hijo _ Nodo.Nodes.Add(Tnfo.Ñame " i _ 

Tnfo.MemberType.ToString( ) & " ) M ) 

If Info.MemberType - MemberTypes.Method Then 

EnumeraParametros(Hijo, Info) 

End If 


Next 
End Sub 



Prívate Sub EnumeraParametros(ByVal 

By Val 

Dím lnfo As Parameterlnto 


Nodo As TreeNode, 
InfoMet.odo As Memberlnfo) 


Por Each 


lnfo In CType(IníoMelodo, 


MethodTnfo).GetParameters 


Nodo. Nodes . Add ( I ufo. Ñame (, " - 
lnfo.ParameterType.ToString) 


Next 
End Sub 
End Class 


f. 


Jerarquía de tipos 
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Figura 23.4. Vista jerárquica de tipos de un ensamblado 




ti código prácticamente está auto-documentado con los comentarios que se 
han introducido. Uno de los pocos puntos destacables es la llamada al método 
EnumeraParametros ( ) desde EnumeraMiembros { ). F.n éste último se dis¬ 
pone de un objeto de clase Memberlnf o con información genérica sobre el tipo 
de miembro, objeto que se entrega al primero. En dicho método se efectúa una 
conversión de Memberlnf o a Methodlnfo para poder asi recuperar la lista de 
parámetros. Esto es posible, lógicamente, porque la variable Infodel método 
EnumeraMiembros aunque es de tipo Memberlnf o apunta a un objeto Method¬ 
lnfo, hecho que hemos comprobado mediante la propiedad MemberType. Si 
ésta no contuviese el valor MemberTypes .Method la citada conversión provo¬ 
caría una excepción 

U 50 dinámico de objetos 


Si la información recuperada durante la ejecución tan sólo nos sirviera para 
mostrarla al usuario, lo cierto es que su utilidad seria mínima. Una aplicación 
que usa los servicios de reflexión para recuperar información generalmente la 
utiliza con otro fin, no para mostrarla al usuario, como puede ser el acceso di 
námico a los objetos, sin conocer previamente mi localización ni tipo. 

Algunas de las clases citadas en los puntos previos, como Methodlnfo v 
Propertylnf o, disponen de miembros que facilitan su invocación, recupera¬ 
ción o modificación de valor. Methodlnfo, por ejemplo, cuenta con un méto¬ 
do llamado Invoke{ ) que efectúa una llamada al método representado sobre 
un objeto que debemos facilitar como parámetro. De manera análoga, Proper¬ 
tylnf o cuenta con los métodos GetValue( ) y SetValue( ) cuya finalidad 
es fácil suponer. 

Hasta ahora, en los ejemplos desarrollados en capítulos previos, si hemos 
querido usar un cierto objeto, por ejemplo un formulario, este ha sido definido 
en un módulo del mismo proyecto o, como mucho, se trataba de una clase aloja¬ 
da en una biblioteca de enlace dinámico cuya referencia hemos importado. En 
definitiva, el entorno conocía el tipo del objeto a crear y usar, de tal forma que 
permitía crearlo y acceder a sus métodos v propiedades sin ningún problema. 

l as dificultades surgen cuando los objetos a usar no tienen tipos conocidos 
durante el desarrollo de la aplicación, por ejemplo porque se vayan a facilitar 
posteriormente en forma de bibliotecas fácilmente acluali/ables ¿Cómo pode¬ 
mos crear un objeto de una clase sin disponer de una referencia a ella durante 
la tase de desarrollo? En ese caso usaríamos lo que se denomina binilin$ o 

enlace temprano o en fase de compilación. Como no existe esa posibilidad, ten¬ 
dremos que recurrir al Inte bi)iiiin$ o enlace tardío o en fase de ejecución. 


La clase Activator 

El primer paso para poder utilizar una clase medíante enlace en fase de eje¬ 
cución, creándola \ accediendo a sus miembros de manera dinámica, es crear 



un objeto a partir de esa clase, tse es el cometido de los métodos compartidos 
de la clase Activator. que podemos usar tanto para crear objetos locales co¬ 
mo remotos, asi como para recuperar referencias a objetos que va están ejecu¬ 
tándose en algun punto. 

I .os dos métodos que mas nos interesan de esta clase sonCreatelnstance ( ) 
v CreateInstanceFrom( ). ti primero de ellos crea un objeto de una clase a 
partir de su información de tipo, que deberemos facilitar mediante un objeto 
Type. Ya sabemos que podemos abrir un ensamblado v enumerar todos sus ti¬ 
pos, por lo que no tendríamos más que entregar esos tipos a Createlnstance( ) 
para crear objetos I I segundo método, CreatelnstanceFrom( ), necesita 
dos parámetros: el nombre de un ensamblado y el nombre de la dase que va¬ 
mos a usar para crear el objeto. I n un solo paso so abre el ensamblado, localiza 
el tipo v crea el objeto, sin necesidad de pasos previos. 

A su n tiendo que hemos creado una biblioteca de clases v alojado en ella una 
clase llamada Formulario en el ámbito Formulario, podríamos usar el co 
digo siguiente, en otro proyecto alojado en la misma carpeta, para abrn el en¬ 
samblado, recuperar una referencia al tipo y crear el objeto. 


Dim Ensamblado As (Assemblyl « _ 

| Assembly ) .I.oadFrom) " . . \ . . \Formo 1 ario\bin\Formu ] ar io . d 11" ) 

Dim Ciase As Type = 

Ensamblado.GetTypef"formulario.Formular i o") 

Dim Objeto As Object - 

Activator . Createl ns t.ance (Clase) 


Observe que el tipo de la variable Objeto es Object y no Formulario. 
No podríamos utilizar el tipo Formulario como tal ya que en el provecto no 
existe ninguna referencia a ti, por eso utilizamos una referencia genérica a un 
objeto, sin conocer nada más de él 


Nota 

Para poder probar el código anterior, y el del punto siguiente, cree una bi¬ 
blioteca de clases y defina en ella una clase llamada Formulario deri¬ 
vada de Form y que cuente con un solo método, llamadosaludos ( ). que 
se limite a mostrar un mensaje. 


Invocación dinámica 

Disponiendo de una referencia a nuestro objeto en la variable Objeto, po¬ 
dríamos invocar al método Saludos ( ) o, va que Formulario es una clase 
derivada de Form, modificar cualquiera de las propiedades e invocar a cual¬ 
quier método heredado. No podemos, sin embargo, escribir sentencias lales 




como Objeto.Visible = True, ya que Objetóos de tipo Object y en di¬ 
cho tipo no existe Id propiedad Visible. 

I «i Variable Clase definida en el anterior fragmento do código, contenien¬ 
do la información de tipo de nuestro objeto, puede ser utilizada para obtener da¬ 
tos sobre los métodos y propiedades de la clase, tan solo tendríamos que usar 
GetMethodf ) vGetProperty ( ), en este caso, para obtener un objetoMethod- 
Info o Propertylnfo con información sobre el método o propiedad que nos 
intereso. 

F.n el codigo siguiente se utiliza esta técnica para invocar a los métodos Sa¬ 
ludos { ) vShow( ), asi como para modificar el valor de la propiedad Text Al 
ejecutar el código aparecerá primero un mensaje y, a continuación, el formula¬ 
rio con el titulo modificado. 


Diin Método As Methodlnfo = Cl ase.Get Method ( "Sa 1 udos " ) 

Método.Invoke(Objeto, Nothing) 

4 > • '• ,t '*!>•.• 4 J -1 /**•»!» *iM<i 

Dim Propiedad As Propertylnto * Clase.GetProperty("Text" i 

Propiedad.SetValue(Objeto, “Nuevo título de la ventana", Nothing) 


Método = C1 ase.Ge t.Method( "Show" ) 

Método.Invoke( Ob jeto , Nothing) 

F.n este ejemplo hemos asumido que el ensamblado Formulario . dll conte¬ 
nía un tipo Formular io en el ámbito Formulario y que dicho tipo, una clase, 
dispone de ciertos métodos y propiedades. F.n la práctica, sin embargo, pode¬ 
mos usar los métodos explicados anteriormente para conocer los tipos que hay 
en el ensamblado, identificar los métodos y propiedades, asi como sus tipos, e 
invocarlos realmente sin conocerlos de manera previa. No obstante, sólo con lo 
que hemos hecho tenemos un programa que muestra un formulario alojado en 
una biblioteca de enlace dinámico sin contar con un enlace en la fase de diseño. 
Rsto nos permite modificar esa biblioteca siempre que nos interese, por ejem¬ 
plo modificando el diseño del formulario o la definición del método Salu¬ 
dos { ), sin por ello tener que recompilar la aplicación principal. Bastaría con 
redistribuir la biblioteca para actualizar el programa, siempre que se conserve 
el nombre del tipo. 


Nota 

En lugar de facilitar al método LoadFrom( ) de la clase Assembly una 
constante, con el camino y nombre de la biblioteca, también existe la posi¬ 
bilidad de permitir seleccionar al usuario la biblioteca o que ésta venga de¬ 
terminada por algún parámetro de configuración. 





Puntos clave 


• La plataforma NFT dispone de una serie de servicios que hacen posible 
el descubrimiento de la información de tipos durante la ejecución, facili¬ 
tando técnicas como el uso dinámico de objetos sin conocimiento previo 
en la fase de diseño 

• I as clases Assembly y Module identifican a un ensamblado y un modu¬ 
lo, respectivamente, siendo la primera la más interesante al facilitar in¬ 
formación de todos sus tipos. 

• Para aprovechar los servicios de reflexión es fundamental conocer la cla¬ 
se' Type, base de todo el mecanismo de recuperación de información de 
tipos. 

• Mediante los métodos de Type es posible crear una jerarquía de elemen¬ 
tos conociendo los tipos y miembros de lodos los objetos. 

• Podemos crear objetos de clases sin contar con una referencia en tase de 
diseño sirviéndonos de la clase Activator. 

• l.os objetos de las clases Methodlnf o v Propertylnfo facilitan la invo¬ 
cación, lectura y modificación dinámicos 


Resumen 


Mediante las técnicas que hemos conocido en este capitulo podemos conocer 
en ejecución objetos y elementos que en fase de diseño no se conocían, obtenien¬ 
do información sobre clases, enumeraciones, estructuras, métodos, propieda¬ 
des, eventos v, en general, lodos los componentes de un ensamblado. F.stos 
servicios son los que usan los propios diseñadores de Visual Basic .NFT para, 
por ejemplo, facilitar una lista de miembros cuando en el editor se introduce el 
nombre de un objeto o enumerar las propiedades en la ventana Propiedades 
I o más interesante de estos servicios, a menos que vayamos a crear algún 
diseñador ó herramienta similar, es que nos permiten usar objetos de forma di 
námica, sin conocerlos de antemano, aportando mucha flexibilidad al diseño de 
una aplicación. I lemos visto cómo es posible usar un elemento alojado en una 
biblioteca, biblioteca que podría actualizarse siempre que fuese necesario sin 
afectar a la aplicación principal. 






24 

Interactuaclón 
con COM y el API 
de \N\ndowe> 


Visual Basic NFT es un lenguaje que, aunque desarrollado sobre la base de 
Visual Basic (->, está diseñado para operar sobre una plataforma totalmente nue¬ 
va, la plataforma .NFT, con servicios mucho más avanzados y simples que los 
encontrábanlos en versiones previas I lav que tener en cuenta, no obstante, que 
en la actualidad son miles los componentes COM usados en miles de aplicacio¬ 
nes, asi como que muchas de ellas tienen necesidad de acceder a los servicios 
del propio sistema, lo que se conoce habitualmente como API de Windows. 

Que la plataforma NET olre/ca una alternativa mucho más potente, flexi¬ 
ble y simple no implica, sin embargo, una ruptura total con el pasado. F.n la pla¬ 
taforma .NFT existen unos servicios, denominados de interacción y alojados 
en el ámbito System. Interop, que hacen posible la comunicación bidireccional 
entre .NF.T v COM Desde Visual Basic .NFT podemos usar componentes COM, 
así como ofrecer nuestros componentes .NFT a herramientas que trabajan con 
COM. 

También el acceso al API de Windows es totalmente factible, sin bien no sig- 
nitica que sea algo recomendable. Siempre que en la plataforma Nt I exista un 
serv icio para hacer lo que necesitamos es preferible usarlo en detrimento del 
API de Windows, consiguiendo asi una mayor independencia del sistema. Aun¬ 
que en este momento sea un tema que no nos afec te demasiado, en el futuro 






pudríamos necesitar que nuestras aplicaciones operasen sobre la plataforma 
.NFT en otros sistemas operativos para los que esté disponible, y si tenemos 
llamadas al API de Windows lógicamente tendremos problemas para conse¬ 
guir ese objetivo. 

En este breve capítulo abordaremos tres temas distintos: cómo utilizar com¬ 
ponentes C'OM o controles ActiveX desde un proyecto Visual Basic .NFT, co¬ 
mo exportar un componente NFT para que pueda ser usado mediante COM y, 
finalmente, cómo acceder al API de Windows. 


Uso de componen tos COM 


Posiblemente tengamos en uso en nuestros proyectos ya desarrollados con¬ 
troles ActiveX o componentes COM de los que, de momento, no podamos 
prescindir. Para trabajar en Visual Studio .NET, por tanto, precisaríamos esos 
objetos en nuevos proyectos o durante la actualización/conversión de los ya 
desarrollados. 

Dependiendo de que el elemento en cuestión sea un control ActiveX, que 
tomamos habitualmente desde la Caja de herramientas de Visual Basic, o un 
componente COM simple, que no aparece en esa ventana, el proceso de impor¬ 
tación será uno u otro. 

Lo habitual es conocer de antemano el componente COM que necesitamos 
utilizar, de tal manera que sea posible agregar una referencia durante la fase 
de diseño generando el correspondiente RCW. También podemos, no obstante, 
accedera estos componen Ies de ma nera d i ná m ica. 

importación de controles ActiveX 

Comencemos por el supuesto más simple que, en este caso, es que dispon¬ 
gamos de un control ActiveX y que necesitemos utilizarlo en un provecto de 
Visual Basic NFI Dicho control deberá estar registrado en el sistema, acción 
que se efectúa normalmente durante la instalación del componente o el produc¬ 
to del que forme parte, l o único que tenemos que hacer es utilizar ja opción 
Personalizar cuadro de herramientas del Cuadro de herramientas, seleccionan¬ 
do de la página Componentes COM (véase figura 24 1) el control que desea¬ 
mos usar. Si no aparece en la lista siempre podemos pulsar el bolón Examinar 
para localizar la biblioteca donde se encuentra dicho control. 


Nota 

Si dispone de una biblioteca en la que se aloja el control a utilizar y éste no 
se encuentra registrado en el sistema, puede efectuar el registro introducien¬ 
do en la consola del sistema el comandoregsvr32 seguido del nombre de 
la biblioteca incluyendo la extensión. 





Figura 24.1. Importamos el control de hoja de cálculo de Microsoft Office 

Al importar un control ActiveX, Visual Basic NFT se encarga de generar un 
envoltorio o previ/, también conocido como RCVV (Runtimt* Callablr Wrapftcr). 
fisto actúa como intermediario entre COM y NET ocupándose del proceso co¬ 
nocido como mar*httllin$, consistente, básicamente, en la conversión de tipos 
entre un modelo y otro de componentes. El RCVV se ocupa también de la adap¬ 
tación entre COM y el Cl R, de tal turma que el cliente Visual Basic .NET cree 
que está utilizando un control .NET, mientras que éste piensa que está funcio¬ 
nando en un cliente COM. 

Tras la importación del componente no tiene más que utilizarlo como usaría 
cualquier otro, insertándolo en el formulario, personalizando sus propiedades 
v respondiendo a sus eventos. F.n la figura 24.2 puede ver el componente de 
hoja de cálculo de Microsoft Office, un control ActiveX, en un formulario de 
Visual Basic .NFT 

Importación de librerías de tipos 

El segundo supuesto, de los mencionados al principio, es que necesitemos 
usar componentes COM que no necesariamente sean controles. Para ello tendre¬ 
mos que importar la librería de tipos generando el RCVV que, en este caso, de¬ 
beremos usar para crear el componente COM. Suponga que deseamos utilizar 
desde Visual Basic .NET los servicios de DirectX H, el API multimedia de Win¬ 
dows. El primer paso seria seleccionar la opción Añadir referencia de la carpe¬ 
ta Referencias en el Explorador de soluciones, abriendo la pagina COM en la 
ventana que aparece. Seleccionamos la librería de tipos, en este caso DirectX 8 
for Visual Basic Type Library, tal y como se ha hecho en la figura 24.3. Al pulsar 
el botón Aceptar aparecerá un mensaje (véase figura 24 4) indicando que es 
necesario generar un ensamblado con el RCW para poder acceder al compo¬ 
nente COM. 








Figura 24.2. Aspecto del control ActiveX en el interior del formulario 
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Figura 24.3. Seleccionamos la librería de tipos a importar 


I n la lista de reí eren* íjs del proyecto debe aparecer el elemento DxVBLibA 
el ámbito generado en el ijue se encuentran bulos los elementos iroporl.idos de 





la librería de tipos. Puede usar el Examinador de objetos de Visual Basic NFT 
para ver el contenido de ese ámbito: estructuras, enumeraciones, clases, etc. 
Asumiendo que hemos importado la citada librería de tipos, introduciendo el 
código siguiente podríamos enumerar los dispositivos de salida de «ludio exis¬ 
tentes en nuestro sistema: 

Private Sub Forml _I.oad ( By Val sender As System. Object, 

ByVal e As System.EventArgs) Handles MyBase.Load 

Dim MyDX As New DxVBLibA. Di rect. X8 ( } 


Dim MisDispositivos As DxVBLibA. DÍrecLSoundEnum8 = 
MyDX.GetDSEnum() 

Dim indice As Integor, Resultado As String 

For Indice * 1 To MisDispositivos.GetCount 
Resultado = Resultado h 

MisDisposit i vos .GetDesci ipt i on < I ndice ) i, vbCr 

Next 

MessageBox.Show(ResulLado) 

End Sub 
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Figura 24.4. Visual Basic NET nos avisa de la necesidad de generar el RCW 
para poder usar el componente 


Dependiendo del ordenador en el que ejecute el programa el resultado será 
uno u otro. En la figura 24.5 puede ver el obtenido en mi propio sistema. 
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Figura 24.5. Lista de los controladores de audio obtenida mediante DirectX 


U so dinámico d& componentes COM 

En el capitulo previo vimos cómo podía utilizar la información de tipos ob¬ 
tenida en ejecución para usar objetos dinámicamente, sin conocerlos durante la 
lase de desarrollo. Tampoco es absolutamente necesaria importar una librería 
de tipos, generando el RCW, para poder utilizar un componente COM. Si sabe¬ 
mos cuál es su cadena de identificación, lo que se conoce habitualmente como 












protfid, podemos usar las clases Type y Activator para utilizar el componen¬ 
te de forma dinámica. 

Para utilizar el método Createlnstance( ) de la clase Activator antes 
necesitamos información sobre el tipo de objeto que vamos a crear, informa¬ 
ción que en el capitulo anterior obteníamos mediante el método GetType( ) o 
enumerando los tipos de un ensamblado. En este caso, la información sobre el 
tipo está almacenada en el registro de Windows asociada a un C1 SID (CVrfss 
Iclcntifier) y un Pro$hi o cadena de identificación. Los C1S1D son números de 
12K bits bastante difíciles de recordar, pero la cadena de identificación es mu¬ 
cho más descriptiva. En la figura 24.b puede ver en la parte izquierda una serie 
de carpetas, correspondiente cada una de ellas a un Cl.SID de un componente. 
Una de ellas está abierta, apareciendo a la derecha su Progld. 
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Figura 24.6. CLSID y Progld de un componente COM de Microsoft Office 


Para obtener un objeto Type con información de tipo a partir de una cadena 
de identificación, que en este caso es lo más fácil de recordar, usaremos el mé¬ 
todo GetTypeFromProgID ( ) de la propia clase Type. Se trata de un método 
compartido, por lo que podemos llamarlo directamente sin más que poner de¬ 
lante el nombre de la clase. También tenemos a nuestra disposición el método 
GetTypeFromCLSID ( ), en caso de que vayamos a introducir el CLSID en lu¬ 
gar del Pro^lü. 

Disponiendo de la información de tipo, utilizaríamos el método Create¬ 
lnstance ( ) de la clase Activator mencionado antes, creando el componen- 







te v obteniendo una referencia que alojaríamos en una variable de tipoObject. 
A partir de aquí nos serviríamos reiteradamente del método InvokeMember ( ) 
de la clase Type para leer o escribir en las propiedades del objeto e invocar a 
sus métodos. 

Los parámetros que debemos facilitar a dicho método son cinco: 

• Una cadena de caracteres con el nombre de la propiedad o método a in¬ 
vocar. 

• Una constante o combinación de constantes que permitan localizar al 
miembro cuyo nombre se entrega en primer lugar Los más habituales son 
BindingFlags.InvokeMethod, BindingFlags.GetProperty v 
BindingFlags. SetProperty para llamar a un método, leer y modifi¬ 
car una propiedad, respectivamente. 

• Un objeto Binder que facilita la limitación de la selección, por ejemplo 
para invocar a un método sobrecargado. Puede ser Nothing. 

• La referencia al objeto sobre el cual quiere actuarse, que en nuestro caso 
sería el creado previamente con Activator . CreateInstance ( ). 

• F.n último lugar debemos entregar un arreglo de tipo Ob ject con los pa¬ 
rámetros que sean necesarios para el método o propiedad indicados en 
primer lugar. Si no hay parámetros este valor también puede ser Nothing. 

L o único que necesitamos, para poder usar el componente COM, es conocer 
las propiedades y los métodos con que cuenta. Para utilizar Word. Application 
desde nuestro programa, por ejemplo, tendríamos que disponer de documen¬ 
tación sobre Word, sus métodos y propiedades, información que es fácil encon¬ 
trar en la web de MSDN 

Puede realizar una sencilla prueba insertando en un formulario un botón y 
asociando el código siguiente al evento de pulsación: 

Private Sub Bu tton 1_C 1ick{ByVa1 sender As System.Object , 

ByVal e As System.EventArgs) Handles Buttonl .Click 


Dim Tipo As Type » Type.GetTypeFromProgID{"Word.App1ication") 
Dim Objeto As Object * Act. ivator .Createlnstance(Tipo) 


Tipo.T n vokeMember{“Visible", BindingFlags.SetProperty, 

Nothing, Objeto, New Object(} {True)) 


Dim Documentos As Object * Ti po.InvokeMember("Documenta", 

BindingFlags.GetProperty, Nothing, Objeto, Nothing) 

Dim Documento As Object - Documentos.GeLType.InvokeMember( 
"Add" f BindinqFl ags .TnvokeMethod, Nothing, 
Documentos, Nothing) 



ff 1M 


Dim Contenido As Object - Documento.GetType.InvokeMember { 
"Content", BindingFlags .GetProperty, Hothing, 

Documento, Nothing) 

r> < « »*••«? 

Conten ido. GetType . I nvokeMember { " insertAf ter " , 

BindingFldgs.InvokeMethod, Nothing, Contenido, 

New Objectf) {"Texto introducido desde Visual Basic .NET")) 

Documento.GetType.InvokeMember("Save As ", 

BindingFlags.TnvokeMethod, Nothing, Documento, Nothing) 

End Sub 

Tras crear el componente, modificamos el valor de la propiedad Visible 
para que la ventana de Word aparezca en pantalla. A continuación recupera¬ 
mos la propiedad Documents, que es una colección, para añadir un nuevo do¬ 
cumento. Éste se compone de diversas partes, entre ellas un contenido que está 
representado por la propiedad Content. Nos servimos de ella para insertar 
un texto y, finalmente, guardamos el documento. Al ejecutar el programa verá 
que se abre Word, lógicamente siempre que lo tenga instalado en mi sistema, v 
que se genera un nuevo documento con un texto y se guarda automáticamente. 

Exposición de componentes .NET a COM 


Cuando aparece una nueva herramienta de desarrollo, como es en este caso 
Visual Basic .NET, lo habitual os que encontremos la necesidad de utilizar con 
ella componentes que va teníamos de la versión anterior. I lomos visto en los 
puntos anteriores que podemos hacerlo sin ningún problema. El caso inverso, 
exponer componentes de la nueva herramienta para poder usarlos desdo la an¬ 
tigua, os poco habitual, pero la plataforma .NET también Ia contempla. 

l a finalidad del RCW, como hemos visto, os sorvir de intermediario entre 
COM v .NET. Desde Visual Basic .Nb I utilizamos el componente como si tilo¬ 
so cualquier otro, por ejemplo creándolo o invocando a sus métodos. Oculto 
queda el trabajo del RC W que, para que esas llamadas sean posibles, tiene que 
convertirlas v entendérselas con las clásicas interfaces de COM, como lUnknown 
eIDispatch. 

Para que un componente .NET pueda ser usado desde COM el caso es el in¬ 
verso, el uso de interfaces COM debe traducirse apropiadamente, teniendo en 
cuenta que la herramienta COM ejecuta código nativo Win32 y que el compo¬ 
nente .Nb l es código MSII . I o que necesitamos, para hacer posible esa comuni¬ 
cación, es generar un CCW (COM Cnllahb Wrtippcr). 

Además hay que tener en cuenta el sistema que usa COM para localizar los 
componentes. Estos deben estar registrados apropiadamente, introduciendo 
su CLSID, ProylD, localización física y otros datos en el registro de configura¬ 
ciones de Windows. Por ello, un ensamblado .NET que contiene un componen¬ 
te que va a exponerse a COM debe ser un ensamblado compartido, para lo cual 
debe contar con una identificación única. 



Nota 

En COM no existen los ámbitos con nombre, que es el sistema utilizado en 
NET para identificar de forma inequívoca a los diversos elementos que 
pueden componer un proyecto. Por ello es necesario utilizar otro sistema 
de identificación. 


Desarrollo y opciones del componente 

Vamos ahora a disoñar un componente .NI* I alocándolo en una biblioteca 
de clases, como es habitual. Este componente estará derivado de System .Win¬ 
dows . Forms . Form y sólo añadiremos un nuevo método, llamadoSaludos ( ), 
que mostrará una ventana con un mensaje Es, básicamente, el mismo compo¬ 
nente que hablamos creado al tina! del capitulo anterior v que después usába¬ 
mos de manera dinámica. 

Más que el componente en sí, lo importante en este caso son las opciones de 
configuración necesarias para que pueda ser utilizado desde COM I sas opcio¬ 
nes serán siempre las mismas, independientemente de la finalidad concreta que 
tenga el componente. El primer paso será abrir la ventana de propiedades del 
proyecto, accediendo a la página Nombre seguro que aparece en la figura 24.7. 
En ella activamos la opción Generar nombre seguro usando y, a continuación, 
pulsamos el botón Generar clave. Con esto conseguimos que se cree una clase 
única para nuestro ensamblado, clave que permitirá la identificación inequívo¬ 
ca de manera similar a un Cl SID de COM 



Figura 24.7. Generamos una clave para asociarla al ensamblado 


Usando esa clave, al compilar el provecto queremos que el ensamblado se re¬ 
gistre adecuadamente para que COM pueda encontrarlo. Con este íin tenemos 





que activar la opción Registrar para interoperabilidad COM de la página Gene¬ 
rar en la misma ventana de opciones de proyecto (véase figura 24.S). Podemos 
cerrar la ventana de propiedades pulsando el botón Aceptar y compilar el pro¬ 
vecto. En la ventana de resultados veremos una indicación acerca del registro 
en COM. 



Figura 24.8. Activamos la opción de registro en COM 


U50 de I componente deede un diente COM 

Aunque no es necesario, podemos comprobar la operación de registro efec¬ 
tuada por Visual Basic NETsirviéndonos de la utilidad regedit de Windows. 
En la rama Mi PC\HKEY_CLASSES_ROOT debemos encontrar una entrada con 
el nombre ComponenteNETCOM. Formu larioNET que, como se aprecia en la 
figura 24.9, cuenta con una subearpeta que contiene el CLS1D del componente. 
No necesitamos hacer nada más, el componente ya puede utilizarse desde cual¬ 
quier cliente que utilice COM. 

Para comprobar el funcionamiento de nuestro componente .N ET desde COM 
podemos usar cualquier cliente que utilice COM, no tiene necesariamente que 
ser Visual Basic 6. Un ejemplo podría ser Excel 2000. Accedemos al editor de 
VBA v añadimos una referencia al componente, como se hace en la figura 24 10 
Asociado a una de las hojas que contiene el libro abierto por defecto, introduci¬ 
mos el código siguiente para conseguir que cada vez que se cambie la celdilla ac¬ 
tiva se utilice nuestro componente NET mostrando el mensaje v el lormulario. 

Prívate Sub Worksbeet_Se1ectíonChange( ByVal Target As Ranqej 
Dim MiComponente As New ComponenteNETCOM.ForraularioNET 
MiComponente.Saludos 

MiComponente. Test * ''formulario .NET en Excel 2000" 

MiComponente.Show 

End Sub 
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Figura 24.9. Información introducida por Visual Basic NET en el registro 
de Windows 
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Figura 24.10. Añadimos a Excel una referencia al componente 
antes registrado 


rodemos cerrar el editor VBA de Excel y comprobar cómo .d movernos de 
una celdilla a otra aparece la ventana con el mensaje y a continuación el formu¬ 
lario, un formulario diseñado con Visual Basic .NEI v que estamos utilizando 
desde una aplicación, en este caso Excel, que no funciona sobre la plataforma 
.NE I sino nativamente en Windows. 










lal v como puedo verse, la iiitoroperabilidad es total y simple para el desa 

rrolLidor. 


Acceso a\ API de Windows 

I .1 plataforma .NI I dispone de Ionios servicios que ililu límenle ene ontr.ire¬ 
mos uno lo/on poro rn m r r i i-di reí lómente ol ATI di* Windows, esos excepciones, 
no obstante. existen, v vamos o ver come» podemos aduar cuando nos envon- 
I remos ton ellos 

Poro ulili/or uno función del API de Windows es lundomentol conocer mi 
nombre, locali/ai ion, tipo de dolo tle lelorno v lo lisio de parámetros, l odo eso 
informo^ ion la encontraremos en la documentación conocida como Phitfonn 
de Mic rosoli, accesible desde lo sede web de MSDN. Intentar lo declaración v 
llamado .1 uno (unción sin estar seguros, por ejemplo, de los tipos de los poro 
niel ros es uno pro» lie a peligrosa. 

I óticamente, hav que conoce 1 lo correspondein ia entre ti posde dolos V\ m 32 
y los tipos tle \ imioI B.isic \ I I. Si una tune ion Win32 devuelve un valor ti»* h 
po LONG. por ejemplo, debemos saber si en Visual Basic NI I lo queremos Po¬ 
lar como un número caso en el que útil i/a riamos el tipo Integer. o bien como 
un puntero, recurriendo entonces al tipo IntPtr 

Declaración de la función 

I I piimer poso que tendremos que dar para acceder a una Imnion del API 
de Windows es declararla en Visual Basic NI I Para ello podemos utilizar la 
sentencia Decl are, como se Inicia en Visual Basic b. o bien utilizar el atribulo 
Dlllmport precediendo el prototipo de lo función, indicando lo biblioteca en 
que se encuentra. 

Suponga que quiere usar la luiu ion GeLTickCounl ( ) del API de Windows. 

I sfo 110 necesita parame!ros \ devuelve un entero indicando el número de tn A•• 
de* reloj transcurridos desde el ¡ni» ¡o de Windows Podríamos hacer la dec Lira 
» ion usando la sentencia Declare: 

Declare Function Cet T IckCciUnt Lib " k*=*r ni° I J/ . d I I " () As Integer 

O bien el melle ¡miado atribulo Dlllmport 


* D1 1 1 mpot t ( "kerué 1 \2 .di | **) > 

Public Shared Function líetTickCount( ) As Integer 
End Function 

Independientemente del método usado, tenemos en el provéelo un ulenlili- 
c ador, en este casoGetTickCoun t ( ), que hace referencia a una fuñe ion Win 32 
alojada en uno biblioteca clasica con codigo nativo. 



Nota 

Para poder usar el atributo Dlllmport tendrá que añadir al proyecto una 
sentencia imports para importar el contenido del ámbito System. Run- 
time. interopServices. También puede crear una referencia comple¬ 
ta: System.Runtime.InteropServices.Dlllmport, prescindiendo 
de la importación. 


Uso de las funcionas 

l-.lect uada lo declaración, las funciones del ATI de Windows los usaremos 
desde nuestro programa Visual Basic NI- I como si de cualquier otra función 
se frataso I n realidad aparecen como métodos compartidos, no asm i.idos a 
ningún objeto, v sabemos perfectamente romo utili/ar esos métodos. C untan¬ 
do con la declaración efectuada en el punto anterior, podemos disponer en un 
formulario un bolón v una etiqueta de texto mostrando en la propiedad Text 
de esta el valor dev uelto por GetT LckCoun L Cada ve/ que pulse el botón ve¬ 
ra que el numero de pulsos aníllenla, come» es de esperar 


Puntos c\av& 


• Desde un provecto Visual Basic NI I podemos ulili/ar cualquier > ompu- 
nente COM generando un KCW {RunUmv Ca/Jub/i* iVrappcO, un interme¬ 
diario que eleclua lodo el trabajo de adaptación entre .NI I \ COM 

• I os controles v componentes pueden importarse desde un provecto \ ser 
usados umu) cualquier oiro componente NI I gracias al RC’W 

• lambien pueden utilizarse los servicios de descubrimiento de tipos en 
ejecución para operar dinámicamente sobre cualquier componente COM 
automati/able 

• Un componente .NI I puede tontigurarso para generar un t t W (L'OAI 
Cnlltiblt' Wrwppt'/) e introducir en eí registro de Windows la información 
necesaria para poder ser usado desde dientes ( OM 

• Mediante el atributo Dlllmport, o la sentencia Declare, podemos ac¬ 
ceder a cualquier servicio del ATI de Windows. 


Resumen 


Visual Basic .NId es un producto que acaba de presentarse, a prim ipios de 
2002, v llega a un campo en el que las aplicaciones \ componentes nativos para 
Windows son el estándar actual Por ello es fundamental contar con servicios 




que permitan interaccionar en ambos sentidos .NET -> COM y COM -> .NET, 
servicios que hemos conocido básicamente en este capítulo generando los RCW 
v CCW utilizando tan sólo las opciones del entorno de Visual Basic -NE I I am¬ 
blen podríamos recurrir a herramientas de la propia plataforma .NET, como 
regasm o tlbimp, que no son necesarias si disponemos de Visual Basic .NF.T 
También se ha explicado cómo acceder a las funciones nativas del AIM de 
Windows, sin entrar en detalles sobre las propias lunciones ya que, en la prác¬ 
tica, debería evitarse su uso a favor de los servicios de la propia plataforma 
NET Utilizar funciones Win32 implica unas dependencias que tendrían que 
superarse lo antes posible. 


















Nuestro objetivo en este capitulo no es ni mucho menos el de describir toda 
la problemática con que podemos encontrarnos al convertir un proyecto de Vi¬ 
sual Basic b a Visual Basic .NRT, objetivo casi inalcanzable por la cantidad de 
situaciones distintas v especificas de cada tipo de proyecto. En su lugar vamos 
a ver un caso práctico, convirtiendo un proyecto simple y conociendo algunos 
de los elementos de compatibilidad introducidos en V isual Basic .NP I. 


El asistente para actualización 

Siempre que abramos desde Visual Basic .NP I un proyecto desarrollado 
con una versión previa de Visual Basic se pondrá automáticamente en marcha 
el asistente para actualización de Visual Basic, cuya ventana de bienvenida apa¬ 
rece en la figura 25.1. Tara trabajar sobre un ejemplo concreto, tomaremos un 
proyecto del titulo Guia práctica tic Vhual Bn>it 6.1), del mismo autor y editorial, 
cuyos ejemplos puede encontraren un paquete comprimido en la sección Com¬ 
plementos de http://www.AnayaMultimedia.es. C oncretamente tomare¬ 
mos un ejemplo del sexto capítulo cuya finalidad es facilitar la navegación por 
el sistema de archivos mostrando gráficos 



Figura 25.1. En la ventana de bienvenida se indican los pasos que seguirá 
el asistente para convertir nuestro proyecto 

F.n el ejemplo mencionado se utilizan controles de Visual Basic 6.0. ningún 
componente ActiveX externo. Tampoco se recurre a ninguna (unción del ATI 
de Windows, tan sólo sentencias del propio lenguaje, nada más. 


Nota 

En el CD-ROM que acompaña al libro encontrará el proyecto original Visual 
Basic 6 correspondiente al proyecto que vamos a convertir. 








Inicio del proceso 

Para poner un marcha uI asistente no tunemos mas que abrir ul archivo vbp 
del provecto Visual Basic que va a actualizarse. Aparucura la ventana mostra¬ 
da un la figura 25.2 v la pulsación del botón Siguiente nos llevara a una serie de 
ventallas con distintas opciones. I n este caso, dado que el provecto es un pro 
grama ejecutable, las opciones disponibles no son muchas I fluiremos que in¬ 
dicar un nuevo camino donde se creara el proveeto Visual Basic NI I tomando 
como base el de Visual Basic b. 

I I proceso de* conversión será, generalmente, brev e v mientras dura podre¬ 
mos ii viendo los módulos sobre los que está ui tuandoel asistente (véase* figu¬ 
ra 25.2) I mali/ada la conversión veremos en el Explorador de soluciones que 
tenemos un nuevo provecto con exactamente los mismos elementos que había 
en el original, va que en este caso concreto no se ha encontrado ningún proble¬ 
ma u resoluble 



Figura 25.2. El asistente conviniendo los módulos 
de nuestro proyecto 


De encontrarse durante el proceso de conversión algún problema insalva¬ 
ble. corno la inexislem u en el sistema do un control usado en el provecto origi¬ 
nal, el asistente nos lo comunicará v detendrá el proceso I n ese caso c oncreto 
tendríamos que localizar el control en cuestión, registrarlo en el sistema v vol¬ 
ver a poner en marcha el asistente de conversión. 

Nota 

Si nuestro proyecto es de una versión anterior a Visual Basic 6.0, por ejem¬ 
plo de la versión 5.0, para efectuar adecuadamente la conversión tendre¬ 
mos que abrirlos primero con Visual Basic 6.0, guardarlos y finalmente 
abrirlos con Visual Basic .NET. 





Informe de actualización 


Además de los formularios v módulos con código necesarios, según los ele¬ 
mentos del proyecto original, al nuevo proyecto Visual Basic NFT también se 
añadirá una página HTML con un informe describiendo las incidencias encon¬ 
tradas durante el proceso de actualización. En él se enumeran los módulos que 
se han tratado, indicando su tipo, los problemas encontrados en él, etc. En nues¬ 
tro caso, tras convertir el proyecto indicando antes, encontraremos un informe 
como el de la figura 25.3, sin ningún problema en la conversión a Visual Basic 
.NET. Es lógico dada la simplicidad del proyecto, pero no siempre será asi. 

La conversión no será, generalmente, tan directa y simple. En muchos casos 
tendremos que efectuar adaptaciones de forma manual, especialmente si el 
provecto es de cierta complejidad. El informe no sólo nos notificará cuáles son 
los problemas sino que también nos guiará en el proceso de adaptación facili¬ 
tando soluciones a problemas concretos. 
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La capa de compatibilidad de Visual f3a&lc 

Si tras ejecutar el asistente de conversión sobre un proyecto de Visual Basit 
ó echa un vistazo al código obtenido en Visual Basic .NET quizá le sorprenda 







ver algunas peculiaridades, como una sección de código adicional, en el caso 
de los formularios, que se encarga de crear la instancia por detecto que repre¬ 
senta al formulario, o la aparición reiterada del ámbito Microsoft.Visual- 
Basic.Compatibility.VB6. 



Figura 25.4. Aspecto del programa escrito con Visual Basic 6.0 
ejecutándose Iras la conversión a Visual Basic .NET 

Visual Basic .NET cuenta con dos ensamblados, alojados en los módulos 
Microsoft.VisualBasic.dll y Microsoft.VisuaIBasic.Compati¬ 
bility .dll, que alojan gran parte de la funcionalidad de Visual Basic inexis¬ 
tente en la nueva versión. El primero de ellos, que se corresponde con el ámbito 
Microsof t. visualBasic aloja multitud de funciones de uso habitual en Vi¬ 
sual Basic 6, como Ase ( ). Beep( ), InputBox ( ), Mid ( ) o Ki 11 i ), por mencio¬ 
nar algunas bien conocidas. 

En Microsof t .VisualBasic .Compatibi lity .VB6 encontramos, ade¬ 
mas, controles que ya no existen en Visual Basic .NET, como FileListBox o 
DirListBox. así como determinados operadores y funciones que han desapa¬ 
recido, como los operadores lógicos Imp y Eqv. 

Microsoft ha diseñado esta capa de compatibilidad no para que utilicemos 
esas funciones, controles y operadores, algo que deberíamos evitar eri los nue¬ 
vos proyectos, sino con el fin primordial de hacer posible el funcionamiento 
del asistente de conversión de proyectos de Visual Basic 6 a Visual Basic NET. 
Sin la ayuda de los dos ámbitos mencionados el trabajo de dicho asistente seria 
muchísimo más complejo v laborioso, al tiempo que el porcentaje de éxitos de 
conversión disminuiría. El código generado por el asistente de conversión, a pe¬ 
sar de que no se haya producido ninguna incidencia, generalmente puede ser 
mejorado de manera considerable evitando las referencias a la capa de compati¬ 
bilidad, recurriendo en su lugar a los servicios de la plataforma .NF.T. Este, sin 
embargo, es un trabajo que tendremos que efectuar manualmente. 

Controles y llamadas al API 


En los proyectos desarrollados con Visual Basic b.ü es habitual usar no sólo 
los controles propios del producto, recorriéndose también a controles ActiveX 





de terceros. Para poder convertir un proyecto de este tipo tendremos que ins¬ 
talar dichos controles en el ordenador donde actualmente tengamos Visual Ba¬ 
sic .NFT, registrándolos adecuadamente en el sistema. Si el asistente encuentra 
una referencia a un control que no esta registrado la conversión no sera posible. 

Una alternativa es importar el control ActiveX desde Visual Basic .NFT a 
posterior!, siguiendo los pasos que se describieron en el capítulo previo. Soria 
necesario, por tanto, efectuar la inserción manual de los controles en los conte¬ 
nedores y, posiblemente, retocar el código original para adaptarlo a la nueva 
con tigu ración. 

También el uso de funciones del API es una técnica habitual en Visual Basic 
6.0, pero hay que tener en cuenta las diferencias entre los tipos de datos de esa 
versión y los del nuevo Visual Basic .NFT. Fn la versión 6.0 si se espera un va¬ 
lor entero de 32 bits como respuesta de una función se utilizaba el tipo Long, 
mientras que en Visual Studio .NFT el tipo correcto es Integer va que Long 
es un entero de 64 bits. Esas diferencias puntuales son potenciales fuentes de 
problemas. 

I labiendo leído y puesto en práctica los ejemplos del capitulo previo, no de¬ 
beríamos tener problema alguno para utilizar un control ActiveX o convertir la 
llamada a una función del API de Windows en caso de que el asistente notifica¬ 
ra algún tipo de problema. 


Cambios obligados 


A pesar de la existencia de la capa de compatibilidad citada antes, v de la 
equivalencia entre muchos de los controles de Visual Basic NFT respecto a los 
existentes en Visual Basic 6.0, existen ciertos elementos ante los rúales ni el 
asistente de actualización ni nosotros, de manera manual, podremos encontrar 
una solución efectiva y rápida. Algunos de esos elementos son: 

• Acceso a datos con DAO o RDO - Fl método de acceso a datos en Visual 
Basic NFT, va lo sabemos, es ADO.NFT. Si en nuestro provecto Visual 
Basic 6.0 usábamos ADO hay un camino para la actualización, pero si uti¬ 
lizábamos DAO y/o KDO no hay conversión posible, siendo trabajo nues¬ 
tro la adecuación del proyecto. 

• Uso de DDF - Fas funciones del conjunto conocido como Intercambio diná¬ 
mico tic ihilo> no están disponibles en Visual Basic .NFT ni tienen un equi¬ 
valente. por lo que en caso de haberlas usado en el proyecto original será 
preciso buscar otra alternativa para la comunicación entre aplicaciones. 

• Arrastrar y soltar — Otra técnica habitual en Visual Basic 6.0 que no es 
convertida automáticamente a Visual Basic .NI I mediante el asistente de 
actualización, quedando en nuestras manos. 

• C lases web - En Visual Basic 6.0 las aplicaciones Web se basaban en el uso 
de unas clases que no tienen un equivalente directo en Visual Basic .NFT. 



Sería necesario generar una aplicación basada en formularios Web de 
ASP.NE'I y convertir manualmente la funcionalidad de un proyecto a otro. 

• Control contenedor OLE Este control, de uso muy habitual en Visual 
Basic 6.0 para facilitar la visualizaron y edición de documentos median¬ 
te OLE, no puede utilizarse en Visual Basic .NET, por lo que no hay con¬ 
versión directa posible. 

• Métodos gráficos El asistente de actualización no es capaz de convertir 
automáticamente los métodos gráficos habituales de Visual Basic 6.0, co¬ 
mo Line, Circle y Point, en sus equivalentes de GDI+- Otro trabajo 
que deberíamos realizar manualmente. 

La anterior no es lina lista exhaustiva de los problemas que podemos encon¬ 
trar en la transición de Visual Basic 6.0 a Visual Basa NET. sino simplemente 
una enumeración de los casos más habituales. En caso de que la conversión de 
sus proyectos actuales, por dimensiones e importancia, sea un factor primor¬ 
dial puede recurrir a documentación específica sobre el tema. La propia Mi¬ 
crosoft edita un libro. Ululado Upgnuihig Microsoft Visual Basic b,() lo Microsoft 
Visual Basic NLT, en el que recorre a lo largo de casi 600 páginas toda la pro¬ 
blemática de conversión de proyectos de una versión a otra del producto. 


Puntos clave 


• Visual Basic .NE I dispone de un asistente que se activa automáticamente 
al abrir un proyecto de Visual Basic 6.0, facilitando su actualización auto¬ 
mática y generando un informe de incidencias. 

• La plataforma .NET dispone de unos ensamblados que contienen parte 
de la funcionalidad de Visual Basic 6.0 que ha desaparecido de* Visual Ba¬ 
sic ALT. haciendo posible el funcionamiento del asistente. 

• El uso de controles ActiveX y las llamadas a funciones del API, asi como 
el uso de ADO, RDO v ciertas técnicas y controles, no tienen una actuali¬ 
zación automática y requiere siempre una intervención manual por nues¬ 
tra parte. 

Resumen 


Como ha podido ver en este capitulo, a pesar de la existencia en Visual Ba¬ 
sic NE I de un asistente de actualización lo cierto es que, en la práctica y con 
proyectos reales, la conversión de aplicaciones desde versiones previas de Vi¬ 
sual Basic plantea diversos problemas que afectan desde al mecanismo de ac¬ 
ceso a datos utilizado antaño hasta la imposibilidad de utilizar ciertos controles 
en la nueva versión. 



La adaptación, por lo tanto, puede requerir un esfuerzo considerable, pero 
hay que evaluar también los beneficios que se obtienen al finalizar el proceso. 
Una vez que tengamos nuestra aplicación funcionando con Visual Basic NET, 
posiblemente con ciertas dependencias de controles ActiveX, el ATI de Windows 
v la capa de compatibilidad mencionada, tenemos a nuestro alcance todos los 
servicios de la plataforma ¿NET, así como la tranquilidad de poder ir adaptan¬ 
do nuestro trabajo poco a poco, a medida que vayamos abandonando los servi¬ 
cios clásicos de Windows. 




